# HG changeset patch # User Richard M. Stallman # Date 861090505 0 # Node ID f383bfae320250c7875069a4cef52aa8f62ecc11 # Parent c4cd2317fe6049741d5d36d254187945b5f80e2c (overwrite-mode-binary, overwrite-mode-textual): Use defvar. diff -r c4cd2317fe60 -r f383bfae3202 lisp/simple.el --- a/lisp/simple.el Tue Apr 15 05:07:44 1997 +0000 +++ b/lisp/simple.el Tue Apr 15 07:48:25 1997 +0000 @@ -2639,9 +2639,9 @@ (prin1 selective-display t) (princ "." t)) -(defconst overwrite-mode-textual " Ovwrt" +(defvar overwrite-mode-textual " Ovwrt" "The string displayed in the mode line when in overwrite mode.") -(defconst overwrite-mode-binary " Bin Ovwrt" +(defvar overwrite-mode-binary " Bin Ovwrt" "The string displayed in the mode line when in binary overwrite mode.") (defun overwrite-mode (arg)