Commit 4b189189 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

Change defconsts to defvars.

parent cafef6ab
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment