comparison lisp/packages/apropos.el @ 116:9f59509498e1 r20-1b10

Import from CVS: tag r20-1b10
author cvs
date Mon, 13 Aug 2007 09:23:06 +0200
parents 0d2f883870bc
children 9b50b4588a93
comparison
equal deleted inserted replaced
115:f109f7dabbe2 116:9f59509498e1
560 "Function")) 560 "Function"))
561 do-keys) 561 do-keys)
562 (apropos-print-doc 'describe-variable 2 562 (apropos-print-doc 'describe-variable 2
563 "Variable" do-keys) 563 "Variable" do-keys)
564 (apropos-print-doc 'apropos-describe-plist 3 564 (apropos-print-doc 'apropos-describe-plist 3
565 "Plist" nil)))) 565 "Plist" nil)))))
566 (when temp-buffer-shrink-to-fit
567 (shrink-window-if-larger-than-buffer (get-buffer-window "*Apropos*"))))
568 (prog1 apropos-accumulator 566 (prog1 apropos-accumulator
569 (setq apropos-accumulator ()))) ; permit gc 567 (setq apropos-accumulator ()))) ; permit gc
570 568
571 569
572 (defun apropos-macrop (symbol) 570 (defun apropos-macrop (symbol)