Mercurial > hg > xemacs-beta

diff lisp/packages/apropos.el @ 98:0d2f883870bc r20-1b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b1
author cvs
date Mon, 13 Aug 2007 09:13:56 +0200
parents c0c698873ce1
children 9f59509498e1
line wrap: on
line diff
--- a/lisp/packages/apropos.el	Mon Aug 13 09:12:43 2007 +0200
+++ b/lisp/packages/apropos.el	Mon Aug 13 09:13:56 2007 +0200
@@ -563,7 +563,8 @@
 			     "Variable" do-keys)
 	  (apropos-print-doc 'apropos-describe-plist 3
 			     "Plist" nil))))
-    (shrink-window-if-larger-than-buffer (get-buffer-window "*Apropos*")))
+    (when temp-buffer-shrink-to-fit
+      (shrink-window-if-larger-than-buffer (get-buffer-window "*Apropos*"))))
   (prog1 apropos-accumulator
     (setq apropos-accumulator ())))	; permit gc