From: morioka Date: Mon, 8 Jun 1998 13:19:47 +0000 (+0000) Subject: (mime-setup-enable-inline-html): New variable; add setting for X-Git-Tag: semi-1_5_4~9 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=70d1b6c547a07ee6b0e9088fc2347317787a9496;p=elisp%2Fsemi.git (mime-setup-enable-inline-html): New variable; add setting for mime-w3.el conditionally. --- diff --git a/semi-setup.el b/semi-setup.el index 33ec99c..10bc81a 100644 --- a/semi-setup.el +++ b/semi-setup.el @@ -45,11 +45,35 @@ ) +;; for text/html +(defvar mime-setup-enable-inline-html + (module-installed-p 'w3) + "*If it is non-nil, semi-setup sets up to use mime-w3.") + +(if mime-setup-enable-inline-html + (call-after-loaded + 'mime-view + (function + (lambda () + (autoload 'mime-preview-text/html "mime-w3") + + (ctree-set-calist-strictly + 'mime-preview-condition + '((type . text)(subtype . html) + (body . visible) + (body-presentation-method . mime-preview-text/html))) + + (set-alist 'mime-view-type-subtype-score-alist + '(text . html) 3) + ))) + ) + + +;; for PGP (defvar mime-setup-enable-pgp (module-installed-p 'mailcrypt) "*If it is non-nil, semi-setup sets uf to use mime-pgp.") -;; for PGP (if mime-setup-enable-pgp (eval-after-load "mime-view" '(progn