diff options
| author | Jim Blandy <jimb@redhat.com> | 1991-10-25 22:16:38 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1991-10-25 22:16:38 +0000 |
| commit | f798d950c80153954676635b032b3a894b307b1d (patch) | |
| tree | 94f932fe3b22548bc9a90f09bafd43a74796ba07 /lisp/emacs-lisp/lisp-mode.el | |
| parent | 3e2bea7c253f0393f9209b4b75f724bf0166fded (diff) | |
| download | emacs-f798d950c80153954676635b032b3a894b307b1d.tar.gz emacs-f798d950c80153954676635b032b3a894b307b1d.tar.bz2 emacs-f798d950c80153954676635b032b3a894b307b1d.zip | |
*** empty log message ***
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 54c31c3c78e..0f9193a71c7 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -202,9 +202,10 @@ if that value is non-nil." (defun eval-print-last-sexp () "Evaluate sexp before point; print value into current buffer." (interactive) - (terpri (current-buffer)) - (eval-last-sexp t) - (terpri (current-buffer))) + (let ((standard-output (current-buffer))) + (terpri) + (eval-last-sexp t) + (terpri))) (defun eval-last-sexp (arg) "Evaluate sexp before point; print value in minibuffer. |