procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Stefan Kangas 2021-04-29 13:32:10 +02:00
parent 1054525ae3
commit 086e29d213
1 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
lisp/emacs-lisp/shortdoc.el
View file

@ -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))