;;; modified by MORIOKA Tomohiko <morioka@jaist.ac.jp> (1994/11/ 8)
;;; and OKABE Yasuo <okabe@kudpc.kyoto-u.ac.jp> (1994/11/11)
;;;
-;;; $Id: tm-ftp.el,v 5.0 1994/11/11 04:45:17 morioka Exp $
+;;; $Id: tm-ftp.el,v 6.0 1995/03/13 16:49:24 morioka Exp $
;;;
(provide 'tm-ftp)
(setq pathname
(concat "/anonymous@" site ":" directory))
(message (concat "Accessing " pathname "/" name "..."))
- (switch-to-buffer mime/preview-buffer)
+ (switch-to-buffer mime::article/preview-buffer)
(dired pathname)
(goto-char (point-min))
(search-forward name)