summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Paul Wallington <jpw@pobox.com>2004-03-11 01:27:10 +0000
committerJohn Paul Wallington <jpw@pobox.com>2004-03-11 01:27:10 +0000
commitd544d2ca97c576c07fb19e6f1167531eff66c85a (patch)
tree3021d6fdb7fe22210f3ca2da1f0c88525f3ccdc1
parentc0f97789bf67d4279de3242cc9a87eef059fae38 (diff)
downloademacs-d544d2ca97c576c07fb19e6f1167531eff66c85a.tar.gz
(foldout-fold-list, foldout-modeline-string): Declare them as
variables, not constants.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/foldout.el4
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4ecd05a778f..b2237cb0620 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-03-10 John Paul Wallington <jpw@gnu.org>
+
+ * foldout.el (foldout-fold-list, foldout-modeline-string):
+ Declare them as variables, not constants.
+
2004-03-10 Vinicius Jose Latorre <viniciusjl@ig.com.br>
* ps-print.el: Modification to print *Messages* buffer.
diff --git a/lisp/foldout.el b/lisp/foldout.el
index 0d7c79ec6f7..10f3cecd3ee 100644
--- a/lisp/foldout.el
+++ b/lisp/foldout.el
@@ -214,12 +214,12 @@
(if (not (boundp 'outline-minor-mode))
(error "Can't find outline-minor-mode"))
-(defconst foldout-fold-list nil
+(defvar foldout-fold-list nil
"List of start and end markers for the folds currently entered.
An end marker of nil means the fold ends after (point-max).")
(make-variable-buffer-local 'foldout-fold-list)
-(defconst foldout-modeline-string nil
+(defvar foldout-modeline-string nil
"Modeline string announcing that we are in an outline fold.")
(make-variable-buffer-local 'foldout-modeline-string)