aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNoah Friedman1997-03-27 10:44:56 +0000
committerNoah Friedman1997-03-27 10:44:56 +0000
commit387ccacecfa7bf10a4b3d11c8b9717b1d102c5d4 (patch)
tree3d4ad22657f4c9be008f8bf68fb6e434007c3708
parentd898671ff0413d426c8ad0a2c10e1026f711dcfc (diff)
downloademacs-387ccacecfa7bf10a4b3d11c8b9717b1d102c5d4.tar.gz
emacs-387ccacecfa7bf10a4b3d11c8b9717b1d102c5d4.zip
(eldoc-idle-delay): Make defvar, not defconst.
(eldoc-minor-mode-string): Make defvar, not defconst. (eldoc-argument-case): Make defvar, not defconst.
-rw-r--r--lisp/emacs-lisp/eldoc.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el
index 77b19422a57..c3c9431060a 100644
--- a/lisp/emacs-lisp/eldoc.el
+++ b/lisp/emacs-lisp/eldoc.el
@@ -7,7 +7,7 @@
7;; Keywords: extensions 7;; Keywords: extensions
8;; Created: 1995-10-06 8;; Created: 1995-10-06
9 9
10;; $Id: eldoc.el,v 1.9 1997/02/04 18:21:29 friedman Exp $ 10;; $Id: eldoc.el,v 1.10 1997/02/19 10:24:26 friedman Exp $
11 11
12;; This file is part of GNU Emacs. 12;; This file is part of GNU Emacs.
13 13
@@ -70,14 +70,14 @@ instead.
70This variable is buffer-local.") 70This variable is buffer-local.")
71(make-variable-buffer-local 'eldoc-mode) 71(make-variable-buffer-local 'eldoc-mode)
72 72
73(defconst eldoc-idle-delay 0.50 73(defvar eldoc-idle-delay 0.50
74 "*Number of seconds of idle time to wait before printing. 74 "*Number of seconds of idle time to wait before printing.
75If user input arrives before this interval of time has elapsed after the 75If user input arrives before this interval of time has elapsed after the
76last input, no documentation will be printed. 76last input, no documentation will be printed.
77 77
78If this variable is set to 0, no idle time is required.") 78If this variable is set to 0, no idle time is required.")
79 79
80(defconst eldoc-minor-mode-string " ElDoc" 80(defvar eldoc-minor-mode-string " ElDoc"
81 "*String to display in mode line when Eldoc Mode is enabled.") 81 "*String to display in mode line when Eldoc Mode is enabled.")
82 82
83;; Put this minor mode on the global minor-mode-alist. 83;; Put this minor mode on the global minor-mode-alist.
@@ -86,7 +86,7 @@ If this variable is set to 0, no idle time is required.")
86 (append (default-value 'minor-mode-alist) 86 (append (default-value 'minor-mode-alist)
87 '((eldoc-mode eldoc-minor-mode-string))))) 87 '((eldoc-mode eldoc-minor-mode-string)))))
88 88
89(defconst eldoc-argument-case 'upcase 89(defvar eldoc-argument-case 'upcase
90 "Case to display argument names of functions, as a symbol. 90 "Case to display argument names of functions, as a symbol.
91This has two preferred values: `upcase' or `downcase'. 91This has two preferred values: `upcase' or `downcase'.
92Actually, any name of a function which takes a string as an argument and 92Actually, any name of a function which takes a string as an argument and