summaryrefslogtreecommitdiff
path: root/lisp/bindings.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-12-16 02:42:28 +0000
committerRichard M. Stallman <rms@gnu.org>1996-12-16 02:42:28 +0000
commit4b18918922759103a36a705f1fcf1ce1e0f3997e (patch)
tree31ee574fd776162bedc76ff3bbce6abc91ade143 /lisp/bindings.el
parentcafef6ab6bc8cc8fd5f3374150a3c2e88845f9e4 (diff)
downloademacs-4b18918922759103a36a705f1fcf1ce1e0f3997e.tar.gz
Change defconsts to defvars.
Diffstat (limited to 'lisp/bindings.el')
-rw-r--r--lisp/bindings.el10
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 44d70bf143f..cccaab1c5aa 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -47,9 +47,7 @@
;;; Code:
-;;; This code was NOT generated by autoload.el.
-
-(defconst mode-line-buffer-identification (purecopy '("%F: %12b"))
+(defvar mode-line-buffer-identification (purecopy '("%F: %12b"))
"Mode-line control for identifying the buffer being displayed.
Its default value is (\"%F: %12b\"). Under X, `%F' is replaced with `Emacs'.
Major modes that edit things other than ordinary files may change this
@@ -57,13 +55,13 @@ Major modes that edit things other than ordinary files may change this
(make-variable-buffer-local 'mode-line-buffer-identification)
-(defconst mode-line-process nil
+(defvar mode-line-process nil
"Mode-line control for displaying info on process status.
Normally nil in most modes, since there is no process to display.")
(make-variable-buffer-local 'mode-line-process)
-(defconst mode-line-modified (purecopy '("--%1*%1+-"))
+(defvar mode-line-modified (purecopy '("--%1*%1+-"))
"Mode-line control for displaying whether current buffer is modified.")
(make-variable-buffer-local 'mode-line-modified)
@@ -439,7 +437,7 @@ for \\[find-tag] (which see)."
(define-key esc-map "\\" 'delete-horizontal-space)
(defalias 'mode-specific-command-prefix (make-sparse-keymap))
-(defconst mode-specific-map (symbol-function 'mode-specific-command-prefix)
+(defvar mode-specific-map (symbol-function 'mode-specific-command-prefix)
"Keymap for characters following C-c.")
(define-key global-map "\C-c" 'mode-specific-command-prefix)