From 6e4a68d2b8e03f4a2f74c73a2af640f84e94b929 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Thu, 9 Aug 2007 02:49:10 +0000
Subject: [PATCH] (help-make-xrefs): Fix previous change.

---
 lisp/help-mode.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index 818a0111cb8..74daa9b8afb 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -438,7 +438,9 @@ that."
                 (while (re-search-forward
                         ;; Assume command name is only word and symbol
                         ;; characters to get things like `use M-x foo->bar'.
-                        "\\<M-x\\s-+\\(\\sw\\(\\sw\\|\\s_\\)+\\)" nil t)
+                        ;; Command required to end with word constituent
+                        ;; to avoid `.' at end of a sentence.
+                        "\\<M-x\\s-+\\(\\sw\\(\\sw\\|\\s_\\)*\\sw\\)" nil t)
                   (let ((sym (intern-soft (match-string 1))))
                     (if (fboundp sym)
                         (help-xref-button 1 'help-function sym)))))
-- 
2.39.2