Mercurial > emacs
comparison lisp/mh-e/mh-search.el @ 81179:63f9687cbca3
(mh-index-group-by-folder): Fix typo in docstring.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 06 Jun 2007 15:42:48 +0000 |
| parents | e3694f1cb928 |
| children | 800dd75c042b |
comparison
equal
deleted
inserted
replaced
| 81178:dd86b90cb2cb | 81179:63f9687cbca3 |
|---|---|
| 1355 ;;; Folder Utilities | 1355 ;;; Folder Utilities |
| 1356 | 1356 |
| 1357 ;;;###mh-autoload | 1357 ;;;###mh-autoload |
| 1358 (defun mh-index-group-by-folder () | 1358 (defun mh-index-group-by-folder () |
| 1359 "Partition the messages based on source folder. | 1359 "Partition the messages based on source folder. |
| 1360 Returns an alist with the the folder names in the car and the cdr | 1360 Returns an alist with the folder names in the car and the cdr |
| 1361 being the list of messages originally from that folder." | 1361 being the list of messages originally from that folder." |
| 1362 (save-excursion | 1362 (save-excursion |
| 1363 (goto-char (point-min)) | 1363 (goto-char (point-min)) |
| 1364 (let ((result-table (make-hash-table :test #'equal))) | 1364 (let ((result-table (make-hash-table :test #'equal))) |
| 1365 (loop for msg being the hash-keys of mh-index-msg-checksum-map | 1365 (loop for msg being the hash-keys of mh-index-msg-checksum-map |