changeset 75473:869eaab96a64

(pp-eval-last-sexp): Don't eval here.
author Richard M. Stallman <rms@gnu.org>
date Sun, 28 Jan 2007 07:11:24 +0000
parents ad8f4e060e53
children cf580adfa498
files lisp/emacs-lisp/pp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/pp.el	Sun Jan 28 07:09:44 2007 +0000
+++ b/lisp/emacs-lisp/pp.el	Sun Jan 28 07:11:24 2007 +0000
@@ -158,7 +158,7 @@
     (set-syntax-table stab)
     (if arg
 	(insert (pp-to-string (eval exp)))
-      (pp-eval-expression (eval exp)))))
+      (pp-eval-expression exp))))
 
 ;;; Test cases for quote
 ;; (pp-eval-expression ''(quote quote))