diff options
| author | Bill Wohler | 2009-06-13 17:08:22 +0000 |
|---|---|---|
| committer | Bill Wohler | 2009-06-13 17:08:22 +0000 |
| commit | 86e1c36a8f5f74bd706f9672ece3e6b701b9c549 (patch) | |
| tree | cbbe6f809e420a753934c091c7246bf76dc5a932 /lisp | |
| parent | 2a1cf2b9aad0bc5685d1ea3c3e85afd212c659d3 (diff) | |
| download | emacs-86e1c36a8f5f74bd706f9672ece3e6b701b9c549.tar.gz emacs-86e1c36a8f5f74bd706f9672ece3e6b701b9c549.zip | |
Remove trailing space.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mh-e/mh-seq.el | 2 | ||||
| -rw-r--r-- | lisp/mh-e/mh-speed.el | 2 | ||||
| -rw-r--r-- | lisp/mh-e/mh-xface.el | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mh-e/mh-seq.el b/lisp/mh-e/mh-seq.el index dc7154adf2a..bc0ec94e817 100644 --- a/lisp/mh-e/mh-seq.el +++ b/lisp/mh-e/mh-seq.el | |||
| @@ -746,7 +746,7 @@ completion is over." | |||
| 746 | "-norecurse" folder "-sequence" (symbol-name mh-unseen-seq)) | 746 | "-norecurse" folder "-sequence" (symbol-name mh-unseen-seq)) |
| 747 | (goto-char (point-min)) | 747 | (goto-char (point-min)) |
| 748 | (multiple-value-bind (folder unseen total) | 748 | (multiple-value-bind (folder unseen total) |
| 749 | (values-list | 749 | (values-list |
| 750 | (mh-parse-flist-output-line | 750 | (mh-parse-flist-output-line |
| 751 | (buffer-substring (point) (mh-line-end-position)))) | 751 | (buffer-substring (point) (mh-line-end-position)))) |
| 752 | (list total unseen folder)))) | 752 | (list total unseen folder)))) |
diff --git a/lisp/mh-e/mh-speed.el b/lisp/mh-e/mh-speed.el index f806fb43e72..6cf831315a2 100644 --- a/lisp/mh-e/mh-speed.el +++ b/lisp/mh-e/mh-speed.el | |||
| @@ -455,7 +455,7 @@ be handled next." | |||
| 455 | (substring output position line-end)) | 455 | (substring output position line-end)) |
| 456 | mh-speed-partial-line "") | 456 | mh-speed-partial-line "") |
| 457 | (multiple-value-setq (folder unseen total) | 457 | (multiple-value-setq (folder unseen total) |
| 458 | (values-list | 458 | (values-list |
| 459 | (mh-parse-flist-output-line line mh-speed-current-folder))) | 459 | (mh-parse-flist-output-line line mh-speed-current-folder))) |
| 460 | (when (and folder unseen total | 460 | (when (and folder unseen total |
| 461 | (let ((old-pair (gethash folder mh-speed-flists-cache))) | 461 | (let ((old-pair (gethash folder mh-speed-flists-cache))) |
diff --git a/lisp/mh-e/mh-xface.el b/lisp/mh-e/mh-xface.el index b63a1966266..9e83175ac60 100644 --- a/lisp/mh-e/mh-xface.el +++ b/lisp/mh-e/mh-xface.el | |||
| @@ -76,7 +76,7 @@ in this order is used." | |||
| 76 | (x-face (setq raw (mh-uncompface x-face) | 76 | (x-face (setq raw (mh-uncompface x-face) |
| 77 | type 'pbm)) | 77 | type 'pbm)) |
| 78 | (url (setq type 'url)) | 78 | (url (setq type 'url)) |
| 79 | (t (multiple-value-setq (type raw) | 79 | (t (multiple-value-setq (type raw) |
| 80 | (values-list (mh-picon-get-image))))) | 80 | (values-list (mh-picon-get-image))))) |
| 81 | (when type | 81 | (when type |
| 82 | (goto-char (point-min)) | 82 | (goto-char (point-min)) |