Mercurial > emacs
comparison lisp/mh-e/mh-xface.el @ 70028:d81780942bb8
* mh-acros.el (struct, x, y): No need to wrap defvar with
eval-when-compile when shushing compiler, even when mh-do-in-xemacs or
another construct is used.
* mh-comp.el (sendmail-coding-system): Ditto.
* mh-e.el (mark-active): Ditto.
* mh-folder.el (desktop-save-buffer, font-lock-auto-fontify)
(image-load-path, font-lock-defaults): Ditto.
* mh-letter.el (image-load-path, font-lock-defaults): Ditto.
* mh-mime.el (dots, type, ov)
(mm-verify-function-alist, mm-decrypt-function-alist)
(pressed-details): Ditto.
* mh-search.el (pick-folder, mh-do-in-xemacs)
(mh-mairix-folder, mh-flists-search-folders)
(which-func-mode, mh-speed-flists-inhibit-flag): Ditto.
* mh-seq.el (tool-bar-mode): Ditto.
* mh-utils.el (completion-root-regexp)
(minibuffer-completing-file-name): Ditto.
* mh-xface.el (default-enable-multibyte-characters): Ditto.
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Sat, 15 Apr 2006 00:28:08 +0000 |
parents | 6a7173abcf59 |
children | 2443b8a6f498 |
comparison
equal
deleted
inserted
replaced
70027:0e0916499a15 | 70028:d81780942bb8 |
---|---|
58 (or mh-decode-mime-flag mh-mhl-format-file | 58 (or mh-decode-mime-flag mh-mhl-format-file |
59 mh-clean-message-header-flag)) | 59 mh-clean-message-header-flag)) |
60 (funcall mh-show-xface-function))) | 60 (funcall mh-show-xface-function))) |
61 | 61 |
62 ;; Shush compiler. | 62 ;; Shush compiler. |
63 (eval-when-compile | 63 (defvar default-enable-multibyte-characters) ; XEmacs |
64 (mh-do-in-xemacs (defvar default-enable-multibyte-characters))) | |
65 | 64 |
66 (defun mh-face-display-function () | 65 (defun mh-face-display-function () |
67 "Display a Face, X-Face, or X-Image-URL header field. | 66 "Display a Face, X-Face, or X-Image-URL header field. |
68 If more than one of these are present, then the first one found | 67 If more than one of these are present, then the first one found |
69 in this order is used." | 68 in this order is used." |