[mew-dist 20636] input folder error

[Hideyuki SHIRAI ( 白井秀行 )]

input case を指定している状態で、"g" => backspace => Return でエ
ラーになります。

# folder名として "case:" が後段にわたるため。

-- 
白井秀行 (mailto:shirai at example.com)

Index: mew-minibuf.el
===================================================================
RCS file: /cvsroot/shirai/mew/mew/mew-minibuf.el,v
retrieving revision 1.51
diff -u -r1.51 mew-minibuf.el
--- mew-minibuf.el	27 Feb 2002 01:03:15 -0000	1.51
+++ mew-minibuf.el	15 Mar 2002 06:01:22 -0000
@@ -74,10 +74,10 @@
 				       mew-input-map
 				       nil
 				       'mew-input-folder-hist))
+    (when (or (string= folder "") (string= folder prefix))
+      (setq folder default))
     (setq folder (mew-canonicalize-case-folder folder))
-    (if (or (string= folder "") (string= folder prefix))
-	(directory-file-name default)
-      (directory-file-name folder)))) ;; +foo/ -> +foo
+    (directory-file-name folder))) ;; +foo/ -> +foo
 
 (defun mew-input-folders (default)
   (let (prompt init folders)