changeset 16691:285f4e41d163

Change defconsts to defvars.
author Richard M. Stallman <rms@gnu.org>
date Mon, 16 Dec 1996 02:42:28 +0000
parents 97029c2699a7
children f851c95cc5b1
files lisp/bindings.el
diffstat 1 files changed, 4 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bindings.el	Mon Dec 16 01:39:18 1996 +0000
+++ b/lisp/bindings.el	Mon Dec 16 02:42:28 1996 +0000
@@ -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 @@
 
 (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 @@
 (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)