summaryrefslogtreecommitdiff
path: root/lisp/ielm.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-06-10 23:00:56 +0000
committerRichard M. Stallman <rms@gnu.org>1994-06-10 23:00:56 +0000
commite58df0dc548826092cb94521281b368dd78509c8 (patch)
treec5291043b33ac37d1de2d5b9d32e9841aa6141fb /lisp/ielm.el
parent03cb20991eb46775dd9a6c0292bce4da8a6b9c40 (diff)
downloademacs-e58df0dc548826092cb94521281b368dd78509c8.tar.gz
(ielm-complete-symbol): Likewise.
Diffstat (limited to 'lisp/ielm.el')
-rw-r--r--lisp/ielm.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ielm.el b/lisp/ielm.el
index b20b5c54dca..3b625f6a64a 100644
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -87,7 +87,7 @@ This variable is buffer-local.")
(defvar ielm-header
(concat
"*** Welcome to IELM version "
- (substring "$Revision: 1.25 $" 11 -2)
+ (substring "$Revision: 1.2 $" 11 -2)
" *** Type (describe-mode) for help.\n"
"IELM has ABSOLUTELY NO WARRANTY; type (describe-no-warranty) for details.\n")
"Message to display when IELM is started.")
@@ -132,7 +132,7 @@ This variable is buffer-local.")
;; A wrapper for lisp-complete symbol that returns non-nil if
;; completion has occurred
(let* ((btick (buffer-modified-tick))
- (cbuffer (get-buffer " *Completions*"))
+ (cbuffer (get-buffer "*Completions*"))
(ctick (and cbuffer (buffer-modified-tick cbuffer))))
(lisp-complete-symbol)
;; completion has occurred if:
@@ -142,7 +142,7 @@ This variable is buffer-local.")
;; a completions buffer has been modifed or created
(if cbuffer
(not (= ctick (buffer-modified-tick cbuffer)))
- (get-buffer " *Completions*")))))
+ (get-buffer "*Completions*")))))
(defun ielm-complete-filename nil
"Dynamically complete filename before point, if in a string."