[Emacs-diffs] /srv/bzr/emacs/trunk r111834: * outline.el (outline-regexp, outline-heading-end-regexp): Use

[Bastien Guerry]

------------------------------------------------------------
revno: 111834
committer: Bastien Guerry <address@hidden>
branch nick: trunk
timestamp: Wed 2013-02-20 14:05:24 +0100
message:
  * outline.el (outline-regexp, outline-heading-end-regexp): Use
  variables, not options (bug#13731).
  
  Setting this as a global option is likely to be useless, because it is
  unlikely that all outline file will use the modified regexp.
  
  Additionnally, if one of these variables if set through customize and
  the outline keybindings don't work in a standard outline file, it is
  hard to know why.
  
  Thanks to T. V. Raman for reporting this.
modified:
  lisp/ChangeLog
  lisp/outline.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-02-20 07:57:33 +0000
+++ b/lisp/ChangeLog    2013-02-20 13:05:24 +0000
@@ -1,3 +1,8 @@
+2013-02-20  Bastien Guerry  <address@hidden>
+
+       * outline.el (outline-regexp, outline-heading-end-regexp): Make
+       variables, not options (bug#13731).
+
 2013-02-20  Glenn Morris  <address@hidden>
 
        * image.el (image-current-frame): Change from variable to function.

=== modified file 'lisp/outline.el'
--- a/lisp/outline.el   2013-01-01 09:11:05 +0000
+++ b/lisp/outline.el   2013-02-20 13:05:24 +0000
@@ -43,25 +43,21 @@
   :prefix "outline-"
   :group 'wp)
 
-(defcustom outline-regexp "[*\^L]+"
+(defvar outline-regexp "[*\^L]+"
   "Regular expression to match the beginning of a heading.
 Any line whose beginning matches this regexp is considered to start a heading.
 Note that Outline mode only checks this regexp at the start of a line,
 so the regexp need not (and usually does not) start with `^'.
 The recommended way to set this is with a Local Variables: list
-in the file it applies to.  See also `outline-heading-end-regexp'."
-  :type 'regexp
-  :group 'outlines)
+in the file it applies to.  See also `outline-heading-end-regexp'.")
 ;;;###autoload(put 'outline-regexp 'safe-local-variable 'stringp)
 
-(defcustom outline-heading-end-regexp "\n"
+(defvar outline-heading-end-regexp "\n"
   "Regular expression to match the end of a heading line.
 You can assume that point is at the beginning of a heading when this
 regexp is searched for.  The heading ends at the end of the match.
 The recommended way to set this is with a `Local Variables:' list
-in the file it applies to."
-  :type 'regexp
-  :group 'outlines)
+in the file it applies to.")
 ;;;###autoload(put 'outline-heading-end-regexp 'safe-local-variable 'stringp)
 
 (defvar outline-mode-prefix-map