From 65b3d4d120202af252d458759ae244ec7c635c67 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Wed, 31 May 2023 16:13:56 +0300 Subject: [PATCH] ; * lisp/misc.el (forward-to-word, backward-to-word): Doc fix. --- lisp/misc.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) 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))) -- 2.39.2