diff lisp/prim/minibuf.el @ 6:27bc7f280385 r19-15b4

Import from CVS: tag r19-15b4
author cvs
date Mon, 13 Aug 2007 08:47:15 +0200
parents b82b59fe008d
children 859a2309aef8
line wrap: on
line diff
--- a/lisp/prim/minibuf.el	Mon Aug 13 08:46:57 2007 +0200
+++ b/lisp/prim/minibuf.el	Mon Aug 13 08:47:15 2007 +0200
@@ -1215,9 +1215,7 @@
 	  (let ((elt (nth (1- minibuffer-history-position)
 			  (symbol-value minibuffer-history-variable))))
 	    (insert
-	     (if (and minibuffer-history-sexp-flag
-		      ;; total kludge
-		      (not (stringp elt)))
+	     (if (not (stringp elt))
 		 (let ((print-level nil))
 		   (condition-case nil
 		       (let ((print-readably t)