Mercurial > emacs
comparison lisp/mh-e/mh-xface.el @ 103411:f5e25950595d
Remove trailing space.
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Sat, 13 Jun 2009 17:08:22 +0000 |
parents | 6837adfb2772 |
children | 1d1d5d9bd884 |
comparison
equal
deleted
inserted
replaced
103410:c894aa66d7ca | 103411:f5e25950595d |
---|---|
74 (cond (face (setq raw (mh-face-to-png face) | 74 (cond (face (setq raw (mh-face-to-png face) |
75 type 'png)) | 75 type 'png)) |
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)) |
83 (when (re-search-forward "^from:" (point-max) t) | 83 (when (re-search-forward "^from:" (point-max) t) |
84 ;; GNU Emacs | 84 ;; GNU Emacs |