Mercurial > emacs
comparison lisp/help.el @ 67281:409eae14f7d9
(print-help-return-message): If pop-up-frames is non-nil, don't display
message about scrolling the help window.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 03 Dec 2005 12:07:03 +0000 |
| parents | 8cf27ba1d450 |
| children | c91001adb561 |
comparison
equal
deleted
inserted
replaced
| 67280:80bbfbaf5e38 | 67281:409eae14f7d9 |
|---|---|
| 157 (if first-message | 157 (if first-message |
| 158 (substitute-command-keys first-message)) | 158 (substitute-command-keys first-message)) |
| 159 (if first-message " ") | 159 (if first-message " ") |
| 160 ;; If the help buffer will go in a separate frame, | 160 ;; If the help buffer will go in a separate frame, |
| 161 ;; it's no use mentioning a command to scroll, so don't. | 161 ;; it's no use mentioning a command to scroll, so don't. |
| 162 (if (special-display-p (buffer-name standard-output)) | 162 (if (or pop-up-windows |
| 163 (special-display-p (buffer-name standard-output))) | |
| 163 nil | 164 nil |
| 164 (if (same-window-p (buffer-name standard-output)) | 165 (if (same-window-p (buffer-name standard-output)) |
| 165 ;; Say how to scroll this window. | 166 ;; Say how to scroll this window. |
| 166 (substitute-command-keys | 167 (substitute-command-keys |
| 167 "\\[scroll-up] to scroll the help.") | 168 "\\[scroll-up] to scroll the help.") |