From: Stefan Kangas <stefan@marxist.se>
Date: Thu, 29 Apr 2021 11:32:10 +0000 (+0200)
Subject: * lisp/emacs-lisp/shortdoc.el: Doc fixes.
X-Git-Tag: emacs-28.0.90~2672
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=086e29d213ac89020d783af2618d4c53532f471e;p=emacs.git

* lisp/emacs-lisp/shortdoc.el: Doc fixes.
---

diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el
index 86d5130bbed..9b31d687035 100644
--- a/lisp/emacs-lisp/shortdoc.el
+++ b/lisp/emacs-lisp/shortdoc.el
@@ -1252,7 +1252,7 @@ Example:
     (define-key map (kbd "C-c C-n") 'shortdoc-next-section)
     (define-key map (kbd "C-c C-p") 'shortdoc-previous-section)
     map)
-  "Keymap for `shortdoc-mode'")
+  "Keymap for `shortdoc-mode'.")
 
 (define-derived-mode shortdoc-mode special-mode "shortdoc"
   "Mode for shortdoc.")
@@ -1269,23 +1269,27 @@ Example:
        (setq ,arg (1- ,arg)))))
 
 (defun shortdoc-next (&optional arg)
-  "Move cursor to next function."
+  "Move cursor to the next function.
+With ARG, do it that many times."
   (interactive "p")
   (shortdoc--goto-section arg 'shortdoc-function))
 
 (defun shortdoc-previous (&optional arg)
-  "Move cursor to previous function."
+  "Move cursor to the previous function.
+With ARG, do it that many times."
   (interactive "p")
   (shortdoc--goto-section arg 'shortdoc-function t)
   (backward-char 1))
 
 (defun shortdoc-next-section (&optional arg)
-  "Move cursor to next section."
+  "Move cursor to the next section.
+With ARG, do it that many times."
   (interactive "p")
   (shortdoc--goto-section arg 'shortdoc-section))
 
 (defun shortdoc-previous-section (&optional arg)
-  "Move cursor to previous section."
+  "Move cursor to the previous section.
+With ARG, do it that many times."
   (interactive "p")
   (shortdoc--goto-section arg 'shortdoc-section t)
   (forward-line -2))