Mercurial > emacs
comparison lisp/mh-e/mh-comp.el @ 91945:8f2ff5b7ee99
(mh-annotate-msg): Remove trailing whitespace.
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Mon, 18 Feb 2008 22:39:31 +0000 |
| parents | 107ccd98fa12 |
| children | e4406f235887 |
comparison
equal
deleted
inserted
replaced
| 91944:81d2b4150534 | 91945:8f2ff5b7ee99 |
|---|---|
| 979 (goto-char (point-max)) | 979 (goto-char (point-max)) |
| 980 (mh-letter-next-header-field))) | 980 (mh-letter-next-header-field))) |
| 981 | 981 |
| 982 (defun mh-annotate-msg (msg folder note &rest args) | 982 (defun mh-annotate-msg (msg folder note &rest args) |
| 983 "Mark MSG in FOLDER with character NOTE and annotate message with ARGS. | 983 "Mark MSG in FOLDER with character NOTE and annotate message with ARGS. |
| 984 MSG can be a message number, a list of message numbers, or a sequence. | 984 MSG can be a message number, a list of message numbers, or a sequence. |
| 985 The hook `mh-annotate-msg-hook' is run after annotating; see its | 985 The hook `mh-annotate-msg-hook' is run after annotating; see its |
| 986 documentation for variables it can use." | 986 documentation for variables it can use." |
| 987 (apply 'mh-exec-cmd "anno" folder | 987 (apply 'mh-exec-cmd "anno" folder |
| 988 (if (listp msg) (append msg args) (cons msg args))) | 988 (if (listp msg) (append msg args) (cons msg args))) |
| 989 (save-excursion | 989 (save-excursion |