diff lisp/prim/lisp.el @ 44:8d2a9b52c682 r19-15prefinal

Import from CVS: tag r19-15prefinal
author cvs
date Mon, 13 Aug 2007 08:55:10 +0200
parents 8fc7fe29b841
children 131b0175ea99
line wrap: on
line diff
--- a/lisp/prim/lisp.el	Mon Aug 13 08:54:52 2007 +0200
+++ b/lisp/prim/lisp.el	Mon Aug 13 08:55:10 2007 +0200
@@ -326,10 +326,7 @@
 		     (setq list (cdr list)))
 		   (setq list (nreverse new))))
 	     (with-output-to-temp-buffer "*Completions*"
-	       (display-completion-list list))
-	     (when temp-buffer-shrink-to-fit
-	       (shrink-window-if-larger-than-buffer
-		(get-buffer-window "*Completions*"))))
+	       (display-completion-list list)))
 	   (message "Making completion list...%s" "done")))))
 
 ;;; lisp.el ends here