summaryrefslogtreecommitdiff
path: root/lisp/textmodes/page-ext.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1994-03-14 21:26:19 +0000
committerKarl Heuer <kwzh@gnu.org>1994-03-14 21:26:19 +0000
commit98526426f434315be161dfc6016b5c6cb50de0d1 (patch)
tree77f960e3bd5d90388303a5ab7c3be7436713f59b /lisp/textmodes/page-ext.el
parentcbd4993c584af7aed3a3a48db4d5af7231759efc (diff)
downloademacs-98526426f434315be161dfc6016b5c6cb50de0d1.tar.gz
(original-page-delimiter, set-page-delimiter): Use printable escapes instead of
embedding literal control chars in the source.
Diffstat (limited to 'lisp/textmodes/page-ext.el')
-rw-r--r--lisp/textmodes/page-ext.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/page-ext.el b/lisp/textmodes/page-ext.el
index caba12e73ee..6cf2496e016 100644
--- a/lisp/textmodes/page-ext.el
+++ b/lisp/textmodes/page-ext.el
@@ -460,7 +460,7 @@ contain matches to the regexp.\)")
'pages-directory-goto)
(define-key pages-directory-map "\C-c\C-p\C-a" 'add-new-page))
-(defvar original-page-delimiter "^ "
+(defvar original-page-delimiter "^\f"
"Default page delimiter.")
(defun set-page-delimiter (regexp reset-p)
@@ -473,7 +473,7 @@ resets the page-delimiter to the original value."
(interactive
(if current-prefix-arg
- (list original-page-delimiter "^ ")
+ (list original-page-delimiter "^\f")
(list (read-string "Set page-delimiter to regexp: " page-delimiter)
nil)))
(make-local-variable 'original-page-delimiter)