aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/textmodes/page.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/textmodes/page.el b/lisp/textmodes/page.el
index 32e505eaae6..dc86e6997be 100644
--- a/lisp/textmodes/page.el
+++ b/lisp/textmodes/page.el
@@ -87,8 +87,9 @@ thus showing a page other than the one point was originally in."
87 ;; If we stopped due to end of buffer, stay there. 87 ;; If we stopped due to end of buffer, stay there.
88 ;; If we stopped after a page delimiter, put end of restriction 88 ;; If we stopped after a page delimiter, put end of restriction
89 ;; at the beginning of that line. 89 ;; at the beginning of that line.
90 (if (save-excursion (beginning-of-line) 90 (if (save-excursion
91 (looking-at page-delimiter)) 91 (goto-char (match-beginning 0)) ; was (beginning-of-line)
92 (looking-at page-delimiter))
92 (beginning-of-line)) 93 (beginning-of-line))
93 (narrow-to-region (point) 94 (narrow-to-region (point)
94 (progn 95 (progn
@@ -136,5 +137,8 @@ thus showing a page other than the one point was originally in."
136 (message "Page %d, line %d" 137 (message "Page %d, line %d"
137 count 138 count
138 (1+ (count-lines (point) opoint))))))) 139 (1+ (count-lines (point) opoint)))))))
140
141;;; Place `provide' at end of file.
142(provide 'page)
139 143
140;;; page.el ends here 144;;; page.el ends here