# HG changeset patch # User Karl Heuer # Date 763195932 0 # Node ID ec7e22ebd6b3f2d72c294d9b9628348cf690ceb4 # Parent e645df5b51487d34af2bb687d2bd7ccd191150f0 (outline-regexp): Initialize outside the defvar. diff -r e645df5b5148 -r ec7e22ebd6b3 lisp/textmodes/ooutline.el --- a/lisp/textmodes/ooutline.el Wed Mar 09 06:42:46 1994 +0000 +++ b/lisp/textmodes/ooutline.el Wed Mar 09 06:52:12 1994 +0000 @@ -34,11 +34,16 @@ ;; Jan '86, Some new features added by Peter Desnoyers and rewritten by RMS. -(defvar outline-regexp "[*\^l]+" +(defvar outline-regexp nil "*Regular expression to match the beginning of a heading. Any line whose beginning matches this regexp is considered to start a heading. The recommended way to set this is with a Local Variables: list in the file it applies to. See also outline-heading-end-regexp.") + +;; Can't initialize this in the defvar above -- some major modes have +;; already assigned a local value to it. +(or (default-value 'outline-regexp) + (setq-default outline-regexp "[*\^L]+")) (defvar outline-heading-end-regexp "[\n\^M]" "*Regular expression to match the end of a heading line.