[Mew-dist 09433] supporting alias with domainpart (Re: mew-1.94b34.tar.gz)

[Hidetomo Hosono]

ほその@千葉大学です。

From: Kazu Yamamoto (山本和彦) <kazu at example.com>
To: mew-dist at example.com
Subject: [Mew-dist 09425] mew-1.94b34.tar.gz
Date: Tue, 22 Jun 1999 12:26:57 +0900

> mew-1.94b34.tar.gz を、ftp.Mew.org:/pub/Mew/beta に置きました。
> 
> やったこと：
> (1) C-uC-cC-a で個人情報を登録できるようになった

　これは嬉しい機能なのですが、ひとつお願いしたいことがあります。第2パー
トに付けた mew-addrbook.el.diff のように、
mew-summary-personalinfo-add を mew-refile-guess-strip-domainpart の値を
見てふるまいを変えるようにして頂けるといいな、と思っているのです。

　私は、以前から Mew のインタラクティブなメールアドレス補完機能を利用し、
メールアドレスの短縮名を敢えて短縮せず、例えば

hoge at example.com hoge at example.com * "Fugako Hoge"
hoge at example.com hoge at example.com * "Hogero Hoge"

というように Addrbook に記述しています。というのは、私がよくメールを出す
相手で同じ user (例では hoge の部分) になってしまう人が複数いることがあ
り、そのような人の短縮名を考えるのが煩わしかったからです。
　そのようなわけで、mew-summary-personalinfo-add を使う際も、以上のよう
な記述が出来るようになっていると、とても有難いのです。もちろん、以上のよ
うな例の場合、

hoge-foo hoge at example.com * "Fugako Hoge"
hoge-bar hoge at example.com * "Hogero Hoge"

としてもいいのは承知しておりますが…。

# それともエイリアスをそんな風に書いているのは古今東西、私だけなのでしょ
# うか :-P 。

　それでは。

----
Hidetomo Hosono @ Chiba University Design Systems
[smtp] hidetomo at example.com, hide at example.com
[http] http://www.students.chiba-u.ac.jp/~qhosono/
-------------- next part --------------
--- mew-addrbook.el~	Tue Jun 22 12:43:26 1999
+++ mew-addrbook.el	Tue Jun 22 18:50:16 1999
@@ -287,8 +287,11 @@
 	      (setq phrase (mew-match 1 from))
 	      (setq phrase (mew-chop phrase)))
 	  (setq phrase ""))
+	(if mew-refile-guess-strip-domainpart
+	    (setq shortname (read-string (format "Input a short name for %s (%s): "
+						 addr user)))
 	(setq shortname (read-string (format "Input a short name for %s (%s): "
-					     addr user)))
+					     addr addr))))
 	(if (equal shortname "")
 	    (setq shortname user))
 	(setq name (read-string (format "Input a name (%s): " phrase)))