From: Eli Zaretskii <eliz@gnu.org>
Date: Wed, 31 May 2023 13:13:56 +0000 (+0300)
Subject: ; * lisp/misc.el (forward-to-word, backward-to-word): Doc fix.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=65b3d4d120202af252d458759ae244ec7c635c67;p=emacs.git

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

diff --git a/lisp/misc.el b/lisp/misc.el
index f97240ed94f..81769696f95 100644
--- a/lisp/misc.el
+++ b/lisp/misc.el
@@ -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)))