Mercurial > emacs
comparison lisp/mh-e/mh-seq.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 | 7daec5f4a289 |
| children | d81780942bb8 |
comparison
equal
deleted
inserted
replaced
| 70026:a0de53f6c617 | 70027:0e0916499a15 |
|---|---|
| 132 (mh-index-delete-from-sequence sequence msg-list)))) | 132 (mh-index-delete-from-sequence sequence msg-list)))) |
| 133 (when (and (eq sequence mh-unseen-seq) (mh-speed-flists-active-p)) | 133 (when (and (eq sequence mh-unseen-seq) (mh-speed-flists-active-p)) |
| 134 (apply #'mh-speed-flists t folders-changed)))) | 134 (apply #'mh-speed-flists t folders-changed)))) |
| 135 | 135 |
| 136 ;; Shush compiler. | 136 ;; Shush compiler. |
| 137 (eval-when-compile (defvar view-exit-action)) | 137 (defvar view-exit-action) |
| 138 | 138 |
| 139 ;;;###mh-autoload | 139 ;;;###mh-autoload |
| 140 (defun mh-list-sequences () | 140 (defun mh-list-sequences () |
| 141 "List all sequences in folder. | 141 "List all sequences in folder. |
| 142 | 142 |