aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJim Blandy1991-04-10 16:36:47 +0000
committerJim Blandy1991-04-10 16:36:47 +0000
commitfa8a7944be3a84d85f085ff4eedba8225c7ebbc8 (patch)
tree45feb2135233ffb19367fad371a7db6f63cdec4f
parent0d2d639ad94ab5682b436bb30e5a33f5972de9b6 (diff)
downloademacs-fa8a7944be3a84d85f085ff4eedba8225c7ebbc8.tar.gz
emacs-fa8a7944be3a84d85f085ff4eedba8225c7ebbc8.zip
*** empty log message ***
-rw-r--r--lisp/textmodes/page.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/textmodes/page.el b/lisp/textmodes/page.el
index 19b29d02f08..576e23a7560 100644
--- a/lisp/textmodes/page.el
+++ b/lisp/textmodes/page.el
@@ -20,7 +20,8 @@
20 20
21(defun forward-page (&optional count) 21(defun forward-page (&optional count)
22 "Move forward to page boundary. With arg, repeat, or go back if negative. 22 "Move forward to page boundary. With arg, repeat, or go back if negative.
23A page boundary is any line whose beginning matches the regexp page-delimiter." 23A page boundary is any line whose beginning matches the regexp
24`page-delimiter'."
24 (interactive "p") 25 (interactive "p")
25 (or count (setq count 1)) 26 (or count (setq count 1))
26 (while (and (> count 0) (not (eobp))) 27 (while (and (> count 0) (not (eobp)))
@@ -37,7 +38,8 @@ A page boundary is any line whose beginning matches the regexp page-delimiter."
37 38
38(defun backward-page (&optional count) 39(defun backward-page (&optional count)
39 "Move backward to page boundary. With arg, repeat, or go fwd if negative. 40 "Move backward to page boundary. With arg, repeat, or go fwd if negative.
40A page boundary is any line whose beginning matches the regexp page-delimiter." 41A page boundary is any line whose beginning matches the regexp
42`page-delimiter'."
41 (interactive "p") 43 (interactive "p")
42 (or count (setq count 1)) 44 (or count (setq count 1))
43 (forward-page (- count))) 45 (forward-page (- count)))