(mime-acting-condition): Rename `mime-display-message/external-ftp' ->

`mime-method-to-display-message/external-ftp'.

diff --git a/mime-play.el b/mime-play.el
index 189e796..5c3dbe6 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -434,7 +434,7 @@ It is registered to variable `mime-view-quitting-method-alist'."
     (dired dir)
     ))
 
-(defun mime-display-message/external-ftp (beg end cal)
+(defun mime-method-to-display-message/external-ftp (beg end cal)
   (let* ((site (cdr (assoc "site" cal)))
         (directory (cdr (assoc "directory" cal)))
         (name (cdr (assoc "name" cal)))

diff --git a/mime-view.el b/mime-view.el
index ee0402c..1552077 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -121,7 +121,7 @@
     ;;         'file '"access-type" '"name" '"site" '"directory"))
     ((type . "message/external-body")
      ("access-type" . "anon-ftp")
-     (method . mime-display-message/external-ftp)
+     (method . mime-method-to-display-message/external-ftp)
      )
     ((type . "message/rfc822")
      (method . mime-method-to-display-message/rfc822)