[mew-dist 21804] Re: とっても危険!! make directory mode of Mew

[Kazu Yamamoto ( 山本和彦 )]

From: Hideyuki SHIRAI (白井秀行) <shirai at example.com>
Subject: [mew-dist 21803] とっても危険!! make directory mode of Mew

> 試しに "~/zzz" というファイルを作っておいて "g" => "zzz" したら、
> "~/zzz" という directory になってしまいました。

これで直りますか？

--かず

Index: mew-summary4.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-summary4.el,v
retrieving revision 1.49
diff -c -r1.49 mew-summary4.el
*** mew-summary4.el	2002/09/27 08:16:39	1.49
--- mew-summary4.el	2002/09/28 04:35:40
***************
*** 94,107 ****
        (if (null dir)
  	  (message "Folder is wrong")
  	(cond
! 	 ((mew-folder-localp folder)
! 	  (if (file-directory-p dir)
! 	      (setq scanp t)
! 	    (message "No such folder %s" folder)))
! 	 (t
  	  (unless (file-directory-p dir)
  	    (mew-make-directory dir))
! 	  (setq scanp t)))
  	(when scanp
  	  (if no-ls
  	      (progn
--- 94,107 ----
        (if (null dir)
  	  (message "Folder is wrong")
  	(cond
! 	 ((mew-folder-remotep folder)
  	  (unless (file-directory-p dir)
  	    (mew-make-directory dir))
! 	  (setq scanp t))
! 	 (t ;; +, ~, /, drive letter
! 	  (if (file-directory-p dir)
! 	      (setq scanp t)
! 	    (message "No such folder %s" folder))))
  	(when scanp
  	  (if no-ls
  	      (progn