[chao 1.14] mmexternal anon-ftp

[Yoshiki Hayashi]

XEmacs 21.2.34 EMY 1.13.7 と chao 1.14 の組合せで使っている
のですが、message/external-body で anon-ftp なものを表示時に
勝手に取りに行こうとします。

問題の原因は、XEmacs では
(expand-file-name "foo" "/anonymous ＠ ftp.example.org:/")
とやると efs が勝手に接続に行ってしまうことです。
とりあえず、以下のようにすると大丈夫なのですが、どうでしょう
か。

-------------- next part --------------
Index: mmexternal.el
===================================================================
RCS file: /cvs/root/flim/Attic/mmexternal.el,v
retrieving revision 1.1.2.3
diff -u -r1.1.2.3 mmexternal.el
--- mmexternal.el	2000/06/23 09:31:09	1.1.2.3
+++ mmexternal.el	2000/07/07 06:08:34
@@ -48,7 +48,9 @@
 		 (string= access-type "anon-ftp"))
 	    (let ((site (mime-content-type-parameter ct "site"))
 		  (directory (mime-content-type-parameter ct "directory"))
-		  (name (mime-content-type-parameter ct "name")))
+		  (name (mime-content-type-parameter ct "name"))
+		  ;; avoid contacting an ftp server.
+		  (file-name-handler-alist nil))
 	      (mime-external-entity-set-body-file-internal
 	       entity
 	       (expand-file-name

-------------- next part --------------

-- 
Yoshiki Hayashi