Mercurial > emacs
changeset 47750:75f4a9fc7b34
(forward-paragraph): Return the steps left.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 03 Oct 2002 23:00:19 +0000 |
parents | 4d7a3dd9a644 |
children | cd005e017b51 |
files | lisp/textmodes/paragraphs.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/paragraphs.el Thu Oct 03 22:48:54 2002 +0000 +++ b/lisp/textmodes/paragraphs.el Thu Oct 03 23:00:19 2002 +0000 @@ -299,7 +299,9 @@ (if (< (point) (point-max)) (goto-char start))) (setq arg (1- arg))) - (constrain-to-field nil opoint t))) + (constrain-to-field nil opoint t) + ;; Return the number of steps that could not be done. + arg)) (defun backward-paragraph (&optional arg) "Move backward to start of paragraph.