# HG changeset patch # User Richard M. Stallman # Date 850704148 0 # Node ID 285f4e41d1638deb7e914af4908ce95cb26edc60 # Parent 97029c2699a707f238dbca899ce6bb15bbab4dc0 Change defconsts to defvars. diff -r 97029c2699a7 -r 285f4e41d163 lisp/bindings.el --- 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)