Mercurial > emacs
changeset 21781:6e9ef4991da8
(ielm-eval-input): Use variables *, **, *** not :, ::, :::.
(inferior-emacs-lisp-mode): Corresponding changes.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 27 Apr 1998 01:28:39 +0000 |
parents | 5dc3fe7cd300 |
children | f2462c6cb265 |
files | lisp/ielm.el |
diffstat | 1 files changed, 13 insertions(+), 13 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ielm.el Mon Apr 27 01:22:08 1998 +0000 +++ b/lisp/ielm.el Mon Apr 27 01:28:39 1998 +0000 @@ -303,15 +303,15 @@ (if (ielm-is-whitespace (substring ielm-string ielm-pos)) ;; need this awful let convolution to work around ;; an Emacs bug involving local vbls and let binding - (let ((:save :) - (::save ::) - (:::save :::)) + (let ((*save *) + (**save **) + (***save ***)) (save-excursion (set-buffer ielm-working-buffer) (condition-case err - (let ((: :save) - (:: ::save) - (::: :::save) + (let ((* *save) + (** **save) + (*** ***save) (ielm-obuf (current-buffer))) (setq ielm-result (eval ielm-form)) (setq ielm-wbuf (current-buffer)) @@ -388,7 +388,7 @@ * \\[comint-dynamic-complete] completes Lisp symbols (or filenames, within strings), or indents the line if there is nothing to complete. -During evaluations, the values of the variables `:', `::', and `:::' +During evaluations, the values of the variables `*', `**', and `***' are the results of the previous, second previous and third previous evaluations respectively. @@ -438,12 +438,12 @@ (setq fill-paragraph-function 'lisp-fill-paragraph) ;; Value holders - (setq : nil) - (make-local-variable ':) - (setq :: nil) - (make-local-variable '::) - (setq ::: nil) - (make-local-variable ':::) + (setq * nil) + (make-local-variable '*) + (setq ** nil) + (make-local-variable '**) + (setq *** nil) + (make-local-variable '***) ;; font-lock support (make-local-variable 'font-lock-defaults)