[mew-dist 20818] Re: mew-summary-goto-folder

[SAITO Takuya]

From: Kazu Yamamoto (山本和彦) <kazu at example.com> さんの
Subject: [mew-dist 20813] Re: mew-summary-goto-folder
Date: Wed, 24 Apr 2002 15:30:05 +0900 (JST) への返信です。

> 	Folder name を聞き返されることでは*なく*
> 	case に応じた inbox にならないことで*ある*
> のでしょうか？
> 
> 後者の場合、現在はそのフォルダの case (case:+folder の case)に応じた 
> inbox が候補になります。

横から済みませんが、こんなのはいかがでしょうか

--
SAITO Takuya <reed at example.com>
-------------- next part --------------
Index: mew-summary4.el
===================================================================
RCS file: /cvsmew/mew/mew-summary4.el,v
retrieving revision 1.27
diff -u -r1.27 mew-summary4.el
--- mew-summary4.el	2002/04/09 12:02:17	1.27
+++ mew-summary4.el	2002/04/23 12:26:01
@@ -56,8 +56,10 @@
 '\\[universal-argument]', the cursor always goes to the bottom of
 Summary mode."
   (interactive "P")
-  (let* ((proto (mew-proto-to-go (mew-summary-folder-name 'ext)))
-	 (case (mew-sinfo-get-case))
+  (let* ((cfld (mew-summary-folder-name))
+	 (proto (mew-proto-to-go cfld))
+	 (case (or (mew-sinfo-get-case)
+		   (and (mew-folder-localp cfld) mew-case-input)))
 	 (inbox (mew-proto-inbox-folder proto case))
 	 (fld (mew-input-folder inbox))
 	 (folder (mew-canonicalize-case-folder fld)))