Mercurial > hg > xemacs-beta
diff lisp/packages/apropos.el @ 22:8fc7fe29b841 r19-15b94
Import from CVS: tag r19-15b94
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:50:29 +0200 |
parents | 49a24b4fd526 |
children | 8d2a9b52c682 |
line wrap: on
line diff
--- a/lisp/packages/apropos.el Mon Aug 13 08:50:06 2007 +0200 +++ b/lisp/packages/apropos.el Mon Aug 13 08:50:29 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