diff options
author | Miles Bader <miles@gnu.org> | 2007-11-11 00:56:44 +0000 |
---|---|---|
committer | Miles Bader <miles@gnu.org> | 2007-11-11 00:56:44 +0000 |
commit | f23d76bdefbd4c06e14d69e99e50d35ce91c8226 (patch) | |
tree | ded28d1da6df2d0135514bac83074f4ca1c9099a /lisp/apropos.el | |
parent | e2d092da5980a7d05a5428074f8eb4925fa801e8 (diff) | |
parent | a457417ee5ba797ab1c91d35ee957bb7a7f8d4b6 (diff) | |
download | emacs-f23d76bdefbd4c06e14d69e99e50d35ce91c8226.tar.gz emacs-f23d76bdefbd4c06e14d69e99e50d35ce91c8226.tar.bz2 emacs-f23d76bdefbd4c06e14d69e99e50d35ce91c8226.zip |
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-283
Diffstat (limited to 'lisp/apropos.el')
-rw-r--r-- | lisp/apropos.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index 9e784e087e6..9fddf0103fb 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -1005,7 +1005,7 @@ If non-nil TEXT is a string that will be printed as a heading." (defun apropos-describe-plist (symbol) "Display a pretty listing of SYMBOL's plist." (help-setup-xref (list 'apropos-describe-plist symbol) (interactive-p)) - (with-output-to-temp-buffer (help-buffer) + (with-help-window (help-buffer) (set-buffer standard-output) (princ "Symbol ") (prin1 symbol) @@ -1014,8 +1014,7 @@ If non-nil TEXT is a string that will be printed as a heading." (put-text-property (+ (point-min) 7) (- (point) 14) 'face apropos-symbol-face)) (insert (apropos-format-plist symbol "\n ")) - (princ ")") - (print-help-return-message))) + (princ ")"))) (provide 'apropos) |