Function: pages-set-delimiter

pages-set-delimiter is an interactive and byte-compiled function defined in page-ext.el.gz.

Signature

(pages-set-delimiter REGEXP RESET-P &optional INTERACTIVELY)

Documentation

Set buffer local value of page-delimiter to REGEXP.

Called interactively with a prefix argument, reset page-delimiter to its original value.

In a program, non-nil second arg causes first arg to be ignored and resets the page-delimiter to the original value.

Key Bindings

Aliases

set-page-delimiter (obsolete since 27.1)

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/page-ext.el.gz
(defun pages-set-delimiter (regexp reset-p &optional interactively)
  "Set buffer local value of `page-delimiter' to REGEXP.
Called interactively with a prefix argument, reset `page-delimiter' to
its original value.

In a program, non-nil second arg causes first arg to be ignored and
resets the page-delimiter to the original value."

  (interactive
   (if current-prefix-arg
       (list pages-original-delimiter t t)
     (list (read-regexp "Set page-delimiter to regexp: " page-delimiter)
           nil t)))
  (setq-local pages-original-delimiter
              (or pages-original-delimiter page-delimiter))
  (setq-local page-delimiter
              (if (not reset-p) regexp pages-original-delimiter))
  (if interactively
      (message "The value of `page-delimiter' is now: %s" page-delimiter)))