(mime-article/decode-message/external-ftp): Unused local variable

`access-type' was abolished; Comment out `mode'.

diff --git a/mime-play.el b/mime-play.el
index 650b4c9..95b5eb7 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -5,7 +5,7 @@
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/9/26 (separated from tm-view.el)
 ;;     Renamed: 1997/2/21 from tm-play.el
-;; Version: $Id: mime-play.el,v 0.14 1997-03-15 20:21:47 morioka Exp $
+;; Version: $Id: mime-play.el,v 0.15 1997-03-15 20:24:54 morioka Exp $
 ;; Keywords: MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -410,11 +410,10 @@
     ))
 
 (defun mime-article/decode-message/external-ftp (beg end cal)
-  (let* ((access-type (cdr (assoc "access-type" cal)))
-        (site (cdr (assoc "site" cal)))
+  (let* ((site (cdr (assoc "site" cal)))
         (directory (cdr (assoc "directory" cal)))
         (name (cdr (assoc "name" cal)))
-        (mode (cdr (assoc "mode" cal)))
+        ;;(mode (cdr (assoc "mode" cal)))
         (pathname (concat "/anonymous@" site ":" directory))
         )
     (message (concat "Accessing " (expand-file-name name pathname) "..."))