From 086e29d213ac89020d783af2618d4c53532f471e Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Thu, 29 Apr 2021 13:32:10 +0200 Subject: [PATCH] * lisp/emacs-lisp/shortdoc.el: Doc fixes. --- lisp/emacs-lisp/shortdoc.el | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) 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)) -- 2.39.5