From 98526426f434315be161dfc6016b5c6cb50de0d1 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Mon, 14 Mar 1994 21:26:19 +0000 Subject: [PATCH] (original-page-delimiter, set-page-delimiter): Use printable escapes instead of embedding literal control chars in the source. --- lisp/textmodes/page-ext.el | 4 ++-- 1 file 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) -- 2.39.5