Mercurial > emacs
comparison lisp/mh-e/mh-show.el @ 70027:0e0916499a15
* mh-funcs.el (view-exit-action): No need to wrap defvar with
eval-when-compile when shushing compiler.
* mh-mime.el (mh-identity-pgg-default-user-id): Ditto.
* mh-seq.el (view-exit-action): Ditto.
* mh-show.el (font-lock-auto-fontify): Ditto.
* mh-utils.el (mh-speed-flists-cache): Ditto
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Fri, 14 Apr 2006 21:28:52 +0000 |
| parents | f3bbf5f32462 |
| children | e3694f1cb928 |
comparison
equal
deleted
inserted
replaced
| 70026:a0de53f6c617 | 70027:0e0916499a15 |
|---|---|
| 813 | 813 |
| 814 ;; Ensure new buffers won't get this mode if default-major-mode is nil. | 814 ;; Ensure new buffers won't get this mode if default-major-mode is nil. |
| 815 (put 'mh-show-mode 'mode-class 'special) | 815 (put 'mh-show-mode 'mode-class 'special) |
| 816 | 816 |
| 817 ;; Shush compiler. | 817 ;; Shush compiler. |
| 818 (eval-when-compile (defvar font-lock-auto-fontify)) | 818 (defvar font-lock-auto-fontify) |
| 819 | 819 |
| 820 ;;;###mh-autoload | 820 ;;;###mh-autoload |
| 821 (define-derived-mode mh-show-mode text-mode "MH-Show" | 821 (define-derived-mode mh-show-mode text-mode "MH-Show" |
| 822 "Major mode for showing messages in MH-E.\\<mh-show-mode-map> | 822 "Major mode for showing messages in MH-E.\\<mh-show-mode-map> |
| 823 | 823 |