Mercurial > emacs
comparison lisp/help.el @ 36249:c96d6054a03e
Comment changes.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 21 Feb 2001 02:37:01 +0000 |
| parents | f5e1761e4c75 |
| children | ab9c82e64020 |
comparison
equal
deleted
inserted
replaced
| 36248:5950691911d4 | 36249:c96d6054a03e |
|---|---|
| 138 (make-local-variable 'font-lock-defaults) | 138 (make-local-variable 'font-lock-defaults) |
| 139 (setq font-lock-defaults nil) ; font-lock would defeat xref | 139 (setq font-lock-defaults nil) ; font-lock would defeat xref |
| 140 (view-mode) | 140 (view-mode) |
| 141 (make-local-variable 'view-no-disable-on-exit) | 141 (make-local-variable 'view-no-disable-on-exit) |
| 142 (setq view-no-disable-on-exit t) | 142 (setq view-no-disable-on-exit t) |
| 143 ;; `help-make-xrefs' would be run here if not invoked from | |
| 144 ;; `help-mode-maybe'. | |
| 145 (run-hooks 'help-mode-hook)) | 143 (run-hooks 'help-mode-hook)) |
| 146 | 144 |
| 147 (defun help-mode-setup () | 145 (defun help-mode-setup () |
| 148 (help-mode) | 146 (help-mode) |
| 149 (setq buffer-read-only nil)) | 147 (setq buffer-read-only nil)) |
| 1456 This makes the window the right height for its contents, but never | 1454 This makes the window the right height for its contents, but never |
| 1457 more than `temp-buffer-max-height' nor less than `window-min-height'. | 1455 more than `temp-buffer-max-height' nor less than `window-min-height'. |
| 1458 This applies to `help', `apropos' and `completion' buffers, and some others." | 1456 This applies to `help', `apropos' and `completion' buffers, and some others." |
| 1459 nil nil nil :global t :group 'help | 1457 nil nil nil :global t :group 'help |
| 1460 (if temp-buffer-resize-mode | 1458 (if temp-buffer-resize-mode |
| 1461 ;; `help-mode-maybe' may add a `back' button and thus increase the | 1459 ;; `help-make-xrefs' may add a `back' button and thus increase the |
| 1462 ;; text size, so `resize-temp-buffer-window' must be run *after* it. | 1460 ;; text size, so `resize-temp-buffer-window' must be run *after* it. |
| 1463 (add-hook 'temp-buffer-show-hook 'resize-temp-buffer-window 'append) | 1461 (add-hook 'temp-buffer-show-hook 'resize-temp-buffer-window 'append) |
| 1464 (remove-hook 'temp-buffer-show-hook 'resize-temp-buffer-window))) | 1462 (remove-hook 'temp-buffer-show-hook 'resize-temp-buffer-window))) |
| 1465 | 1463 |
| 1466 (defun resize-temp-buffer-window () | 1464 (defun resize-temp-buffer-window () |