1 files changed, 5 insertions, 1 deletions

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 481360b5d3c..9cd30107002 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -632,7 +632,11 @@ the C sources, too."
                              (format-message "`%s'" remapped)
                            "an anonymous command"))
                   (princ "as well.\n"))
-                (or remapped (princ "."))
+                ;; The (= (point) start) condition tests whether
+                ;; 'help-fns--insert-menu-bindings' inserted anything;
+                ;; if it didn't, we already have a period from the
+                ;; previous 'princ' call.
+                (or remapped (= (point) start) (princ "."))
                 (fill-region-as-paragraph start (point))))
             (ensure-empty-lines)))))))