[mew-dist 21908] Re: フォルダ間移動の利便性向上計画

[Hideyuki SHIRAI ( 白井秀行 )]

From: Kazu Yamamoto (山本和彦) <kazu at example.com> さん曰く
Subject: [mew-dist 21904] Re: フォルダ間移動の利便性向上計画
Message-ID: <20021011.093918.68561211.kazu at example.com>
Date: Fri, 11 Oct 2002 09:39:18 +0900 (JST)

> これも実現しました。

一点だけ気になるのですが、

Folder name (+inbox): case:+
                           ^

の case の部分で "C-cC-t" したときは "^" にポイントを動かしてし
まった方がよいのではないでしょうか。特に

Folder name (+inbox): 

というなにも無い状態で "C-cC-t" して

Folder name (+inbox): case:
                      ^

にポイントが残るのが気になります。marker 使ったら、Meadow で一
瞬 minbuffer の表示が左に隠れてしまったので、安直な方法なパッチ
です。

-- 
白井秀行 (mailto:shirai at example.com)

--- mew-complete.el.orig	Fri Oct 11 09:55:49 2002
+++ mew-complete.el	Fri Oct 11 13:05:39 2002
@@ -264,7 +264,9 @@
       (if (string= newcase mew-case-default)
 	  (unless insert-: (delete-char 1))
 	(insert newcase)
-	(if insert-: (insert ":"))))))
+	(if insert-: (insert ":"))))
+    (when (looking-at "[^,]*:")
+      (goto-char (match-end 0)))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;