Mercurial > emacs
comparison lisp/mh-e/mh-funcs.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 | 3981e84d0b79 |
| children | e3694f1cb928 c156f6a9e7b5 |
comparison
equal
deleted
inserted
replaced
| 70026:a0de53f6c617 | 70027:0e0916499a15 |
|---|---|
| 136 (goto-char (point-min)) | 136 (goto-char (point-min)) |
| 137 (re-search-forward "^rmf: " (point-max) t)) | 137 (re-search-forward "^rmf: " (point-max) t)) |
| 138 (display-buffer mh-temp-buffer))) | 138 (display-buffer mh-temp-buffer))) |
| 139 | 139 |
| 140 ;; Shush compiler. | 140 ;; Shush compiler. |
| 141 (eval-when-compile (defvar view-exit-action)) | 141 (defvar view-exit-action) |
| 142 | 142 |
| 143 ;;;###mh-autoload | 143 ;;;###mh-autoload |
| 144 (defun mh-list-folders () | 144 (defun mh-list-folders () |
| 145 "List mail folders." | 145 "List mail folders." |
| 146 (interactive) | 146 (interactive) |