(mime-preview-condition): Renamed method for "anon-ftp" access-type to

`mime-view-message/external-anon-ftp' and added new method
`mime-view-message/external-url' for "url" access-type.

diff --git a/mime-view.el b/mime-view.el
index d1ef548..d7168d0 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -620,7 +620,14 @@ MEDIA-TYPE must be (TYPE . SUBTYPE), TYPE or t.  t means default."
  'mime-acting-condition
  '((type . message)(subtype . external-body)
    ("access-type" . "anon-ftp")
-   (method . mime-view-message/external-ftp)
+   (method . mime-view-message/external-anon-ftp)
+   ))
+
+(ctree-set-calist-strictly
+ 'mime-acting-condition
+ '((type . message)(subtype . external-body)
+   ("access-type" . "url")
+   (method . mime-view-message/external-url)
    ))
 
 (ctree-set-calist-strictly