(eval-last-sexp-1): Return the value of the evaluated form.

lisp/emacs-lisp/lisp-mode.el

@@ -482,6 +482,7 @@ With argument, print output into current buffer."
 	    (print-level eval-expression-print-level)
 	    (beg (point))
 	    end)
+	(prog1
 	    (prin1 value)
 	  (setq end (point))
 	  (when (and (bufferp standard-output)
@@ -492,7 +493,7 @@ With argument, print output into current buffer."
 	    (last-sexp-setup-props beg end value 
 				   unabbreviated
 				   (buffer-substring-no-properties beg end))
-	  )))))
+	    ))))))
 
 
 (defun eval-last-sexp (eval-last-sexp-arg-internal)