From a2e215f3a282be7683888f73d02d50011696a64f Mon Sep 17 00:00:00 2001 From: morioka Date: Sat, 15 Mar 1997 20:24:54 +0000 Subject: [PATCH] (mime-article/decode-message/external-ftp): Unused local variable `access-type' was abolished; Comment out `mode'. --- mime-play.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/mime-play.el b/mime-play.el index 650b4c9..95b5eb7 100644 --- a/mime-play.el +++ b/mime-play.el @@ -5,7 +5,7 @@ ;; Author: MORIOKA Tomohiko ;; 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) "...")) -- 1.7.10.4