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

diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el
index 86d5130bbed7cfb5901856772208629c3d46cc24..9b31d687035a7e608a3e23876c5677873a77eedd 100644 (file)
--- 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))