Mercurial > emacs
comparison lisp/mh-e/mh-seq.el @ 68105:5772368fe15e
* mh-funcs.el:
* mh-inc.el:
* mh-init.el:
* mh-mime.el:
* mh-seq.el:
* mh-utils.el: Use ";; Shush compiler." comment consistently per
Mark's suggestion.
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Mon, 09 Jan 2006 20:15:48 +0000 |
| parents | 57c4e7929f99 |
| children | 03bac2d0a4aa |
comparison
equal
deleted
inserted
replaced
| 68104:b10ff4551ab2 | 68105:5772368fe15e |
|---|---|
| 167 (append folders-changed | 167 (append folders-changed |
| 168 (mh-index-delete-from-sequence sequence msg-list)))) | 168 (mh-index-delete-from-sequence sequence msg-list)))) |
| 169 (when (and (eq sequence mh-unseen-seq) (mh-speed-flists-active-p)) | 169 (when (and (eq sequence mh-unseen-seq) (mh-speed-flists-active-p)) |
| 170 (apply #'mh-speed-flists t folders-changed)))) | 170 (apply #'mh-speed-flists t folders-changed)))) |
| 171 | 171 |
| 172 (eval-when-compile (defvar view-exit-action)) ;shush compiler | 172 ;; Shush compiler. |
| 173 (eval-when-compile (defvar view-exit-action)) | |
| 173 | 174 |
| 174 ;;;###mh-autoload | 175 ;;;###mh-autoload |
| 175 (defun mh-list-sequences () | 176 (defun mh-list-sequences () |
| 176 "List all sequences in folder. | 177 "List all sequences in folder. |
| 177 | 178 |