mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-06 11:55:48 +00:00
Code Issues Releases Activity

(forward-paragraph, backward-paragraph, forward-sentence,

Browse Source 
backward-sentence): Add ^ interactive spec.
This commit is contained in:
Chong Yidong 2008-04-02 20:17:05 +00:00
parent 688468a012
commit 2169fd5564
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/textmodes/paragraphs.el
View File

@ -217,7 +217,7 @@ A line which `paragraph-start' matches either separates paragraphs
A paragraph end is the beginning of a line which is not part of the paragraph
to which the end of the previous line belongs, or the end of the buffer.
Returns the count of paragraphs left to move."
(interactive "p")
(interactive "^p")
(or arg (setq arg 1))
(let* ((opoint (point))
(fill-prefix-regexp
@ -361,7 +361,7 @@ paragraph is preceded by a blank line, the paragraph starts at that
blank line.
See `forward-paragraph' for more information."
(interactive "p")
(interactive "^p")
(or arg (setq arg 1))
(forward-paragraph (- arg)))
@ -445,7 +445,7 @@ With negative argument, move backward repeatedly to start of sentence.
The variable `sentence-end' is a regular expression that matches ends of
sentences. Also, every paragraph boundary terminates sentences as well."
(interactive "p")
(interactive "^p")
(or arg (setq arg 1))
(let ((opoint (point))
(sentence-end (sentence-end)))
@ -477,7 +477,7 @@ It works using `query-replace-regexp'."
(defun backward-sentence (&optional arg)
"Move backward to start of sentence. With arg, do it arg times.
See `forward-sentence' for more information."
(interactive "p")
(interactive "^p")
(or arg (setq arg 1))
(forward-sentence (- arg)))