Mercurial > emacs
comparison lisp/mh-e/mh-funcs.el @ 101561:76170411fca7
(mh-pack-folder): Fix docstring.
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Tue, 27 Jan 2009 06:42:11 +0000 |
parents | a1d83c2b479e |
children | 00c0adbb54a9 |
comparison
equal
deleted
inserted
replaced
101560:c7c6fb156f47 | 101561:76170411fca7 |
---|---|
169 | 169 |
170 This command will ask if you want to process refiles or deletes | 170 This command will ask if you want to process refiles or deletes |
171 first and then either run \\[mh-execute-commands] for you or undo | 171 first and then either run \\[mh-execute-commands] for you or undo |
172 the pending refiles and deletes. | 172 the pending refiles and deletes. |
173 | 173 |
174 The hook `mh-pack-folder-hook' is run after annotating; see its | 174 The hook `mh-pack-folder-hook' is run after the folder is packed; |
175 documentation for variables it can use." | 175 see its documentation for variables it can use." |
176 (interactive (list (if current-prefix-arg | 176 (interactive (list (if current-prefix-arg |
177 (mh-read-range "Scan" mh-current-folder t nil t | 177 (mh-read-range "Scan" mh-current-folder t nil t |
178 mh-interpret-number-as-range-flag) | 178 mh-interpret-number-as-range-flag) |
179 '("all")))) | 179 '("all")))) |
180 (let ((threaded-flag (memq 'unthread mh-view-ops))) | 180 (let ((threaded-flag (memq 'unthread mh-view-ops))) |