diff options
| author | Eli Zaretskii | 2005-12-03 12:07:03 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2005-12-03 12:07:03 +0000 |
| commit | 7b057a3d5755259dd96c02d5f3dfe4e98e00c0bc (patch) | |
| tree | c1fb28370ef65f6025c422623abef96e7426a5a3 | |
| parent | a8e7142cdde1f3b596681c6e28bd9fcd6726dea3 (diff) | |
| download | emacs-7b057a3d5755259dd96c02d5f3dfe4e98e00c0bc.tar.gz emacs-7b057a3d5755259dd96c02d5f3dfe4e98e00c0bc.zip | |
(print-help-return-message): If pop-up-frames is non-nil, don't display
message about scrolling the help window.
| -rw-r--r-- | lisp/help.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/help.el b/lisp/help.el index 067e02d5cef..9a779f14d0c 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -159,7 +159,8 @@ specifies what to do when the user exits the help buffer." | |||
| 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. |