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

; * lisp/misc.el (forward-to-word, backward-to-word): Doc fix.

Browse source
This commit is contained in:
Eli Zaretskii 2023-05-31 16:13:56 +03:00
parent 5f6aa5a174
commit 65b3d4d120
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/misc.el
View file

@ -167,8 +167,9 @@ is an upper-case character."
;;;###autoload
(defun forward-to-word (&optional arg)
"Move forward until encountering the beginning of a word.
With argument, do this that many times."
"Move forward until encountering the beginning of the ARGth word.
ARG defaults to 1. When called interactively, ARG is the prefix
numeric argument."
(interactive "^p")
(unless arg (setq arg 1))
(or (re-search-forward (if (> arg 0) "\\W\\b" "\\b\\W") nil t arg)
@ -176,8 +177,9 @@ With argument, do this that many times."
;;;###autoload
(defun backward-to-word (&optional arg)
"Move backward until encountering the end of a word.
With argument, do this that many times."
"Move backward until encountering the end of the ARGth word.
ARG defaults to 1. When called interactively, ARG is the prefix
numeric argument."
(interactive "^p")
(unless arg (setq arg 1))
(forward-to-word (- arg)))