[mew-dist 20995] mew-input-folder

Tatsuya Kinoshita tats at example.com
2002年 5月 30日 (木) 00:24:11 JST


mew-input-folder()で、"+", "-"など記号1文字のみのフォルダ名が通っ
てしまっていたのを修正しました。

(おまけでmew-theme.elのtypo fixも)

-- 
木下達也
-------------- next part --------------

 This patch is written by Tatsuya Kinoshita.  Copyright is disclaimed.

diff -F (def -ur mew.orig/mew-minibuf.el mew/mew-minibuf.el
--- mew.orig/mew-minibuf.el	Fri May 17 15:04:26 2002
+++ mew/mew-minibuf.el	Thu May 30 00:01:31 2002
@@ -77,8 +77,9 @@ (defun mew-input-folder (default)
 				       mew-input-map
 				       nil
 				       'mew-input-folder-hist))
-    (when (or (string= folder "") (string= folder prefix))
+    (when (or (string= folder "") (member folder mew-folder-prefixes))
       (setq folder default))
+    ;; +foo/ -> +foo
     (directory-file-name folder)))
 
 (defun mew-input-folders (default)
diff -F (def -ur mew.orig/mew-theme.el mew/mew-theme.el
--- mew.orig/mew-theme.el	Fri Jan 18 17:46:01 2002
+++ mew/mew-theme.el	Thu May 30 00:02:06 2002
@@ -149,7 +149,7 @@
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;
-;;; Highlight mark
+;;; Highlight eof
 ;;;
 
 (custom-set-faces


Mew-dist メーリングリストの案内