(mime-display-image): Don't wait for redisplay.
[elisp/semi.git] / semi-setup.el
index 00d6500..a721520 100644 (file)
@@ -41,22 +41,15 @@ it is used as hook to set."
     ))
 
 
-;; for image/* and X-Face
+;; for image/*
 (defvar mime-setup-enable-inline-image
   (and window-system
-       (or (featurep 'xemacs)
-          (and (featurep 'mule)(module-installed-p 'bitmap))
-          ))
+       (or (featurep 'xemacs)(featurep 'mule)))
   "*If it is non-nil, semi-setup sets up to use mime-image.")
 
 (if mime-setup-enable-inline-image
-    (call-after-loaded 'mime-view
-                      (function
-                       (lambda ()
-                         (require 'mime-image)
-                         )))
-  )
-
+    (eval-after-load "mime-view"
+      '(require 'mime-image)))
 
 ;; for text/html
 (defvar mime-setup-enable-inline-html
@@ -138,13 +131,13 @@ it is used as hook to set."
         (mime-add-condition
          'action
          '((type . application)(subtype . pkcs7-mime)
-           (method . mime-decrypt-application/pkcs7-mime))
+           (method . mime-view-application/pkcs7-mime))
          'strict "mime-pgp")
 
         (mime-add-condition
          'action
          '((type . application)(subtype . x-pkcs7-mime)
-           (method . mime-decrypt-application/pkcs7-mime))
+           (method . mime-view-application/pkcs7-mime))
          'strict "mime-pgp")
         ))
   )