[Mew-dist 17709] Re: mew-fancy-summary.el

2001年 6月 7日 (木) 13:17:53 JST

From: Shun-ichi TAHARA (田原 俊一) <jado at example.com> さん曰く
Subject: [Mew-dist 17702] Re: mew-fancy-summary.el
Message-ID: <20010607.012125.846945407.jado at example.com>
Date: Thu, 7 Jun 2001 01:21:38 +0900

田原> > ちょっと気が向いたので、mew-summary-hl に手を入れてみました。
田原> > 
田原> > 中身がまるっきり変わってしまいましたので、名前を mew-fancy-summary に
田原> > 変えて流します。

使ってみました。もう、mew-summary-hl.el は捨て去って、
mew-fancy-summary.el に乗り換えましょう > 皆様方

contrib からも外してください > 山本さん

若干改造したので、パッチをお送りします。

(1) defvar => defcustom に変えた。

(2) defface は :group をつけるのが流儀の模様。

(3) 最近の手元の mew-summary-hl.el の改造の適用。
 ・Mew 本体の jit-lock の解除。これしないと、Emacs-21 で
  jit-lock 使っていると全然だめなんです。もうしわけない。 

 ・thread に色付けするときの XEmacs+lazy-lock の謎の挙動(色がつ
  かない時がある)の adhoc な対応。(*1)

(4) (string-width "ああ") => 4, と (length "To:") => 3 を比較し
 て、次の処理で (substring "ああ" 0 3) としてエラーになっていた
 場所を (length "ああ") => 2 と比較するように修正。

です。

さて、一点要望なのですが、mew-scan-form に自分で作った関数を定義
して、なおかつ、

[Mew-dist 17688] mew-fancy-summary.el || ちょっと  <20010606.134307.607963181.z1980163 at example.com> <>
                                      ~~~~~~~~~~~ ここの色を変えたい

な風に body もつけている ^^; と現状では(私の)満足のいく色付けが
出来ないのです。

そのため、mew-fancy-summary-face-spec の alist の cdr に
function も定義出来るように defcustom だけは書きました。
mew-fancy-summary-face-spec が適当なのかどうかも、どうやるのが良
いかも全然わかっていないのですが、とりあえず、

(defcustom mew-fancy-summary-face-spec
 <<snip>>
  :type '(repeat (cons (choice symbol string) (cons (choice face function)))))

はそういうのが欲しいなぁ、ということだと思ってくださいませ ^^;;;

## これ、午後暇があったら考えます。

もう一点気になったのですが、special な人の判定を while + catch +
throw でやっていますが、これ、special な人が多くなると結構時間が
かからないでしょうか？

おそらく、mew-scan-form で各フォルダに (n from) と n が別々に設
定出来るから、その対処だと思うのですが、

mew-fancy-summary-special-alist =>
'((20 (..............))
  (24 (..............))
  (30 (..............)))
   ~~ n ~~~~~~~~~~~~~ n に切り詰めた special な人

という感じに保存して、そのフォルダと同じ n が存在したらそいつを
使う、無かったらその場でもう一丁付け加える、というのはどうでしょ
うか？

これ、速度的には従来の member の方が速いと思う、というのが前提に
なっているのですが、(時間不足のため)実験していないのでなんとも言
えないです。あやふやでごめんなさい。

田原> ふと気が付いたのですが、mew-summary-hl でも mew-fancy-summary でも、
田原> lazy-lock を有効にして使っていると、添付部分の行に色が付かないときがあ
田原> るようです。
田原> 添付部分を展開したときとか、. や : などで再解析したときによく発生しま
田原> す。カーソルを別の行に移動させるときちんと色が付くのですが。

う～～ん、Emacs-20/21 だとそういうことないです。XEmacs-21.2.45
でもないなぁ。唯一、最近、XEmacs-21.2.45 で色がつかないのは、

『normal folder の *subpart 部分* で "tt" すると、thread folder
のごく一部(最初に表示される部分)の色付けがおかしい』

という問題があったのですが、そいつは↑の (*1) で adhoc につぶし
てしまいました。これと関係あるのかな？

ちなみに、この thread の挙動自体、
[Mew-dist 17667] (run-hooks 'mew-thread-display-hook) within original folder?
からの thread の結論のパッチ前では発生しないので、CVS つかってい
ない人は発生しません。

-- 
白井秀行 (mailto:shirai at example.com)

## 昨日、N+I 2001 の IPv6 showcase で *働く* かずさんを見てきま
## した。:-)
-------------- next part --------------
H4sIAAAAAAAAA5SS0W7aMBSGr4fEOxxxM7rUwSkDtlBNySqmqtJUqYB27QaHmNlxZDtF4e
lnOykqol23KHJ8nP87Pr99EEIg6B7lpMwapGshiGpCykOp2PbDqqjhri4BZhDhOJrEky9w
hXHU7wVB8Cp3gozj6HM8nnZIkgAaX84gcEOS9Hswn88hrU0hVdxFy6IuEcsKBqv0Nn1I4X
pHNjLJudxTVVITblW4q7616n4POWbFBEXaEFHFcI2jEZ6O8Awwjidf48kMfALd8KqwWHAO
OPXIVegtYtAFU4Qdt/Bl3UghaGmsxedCf8jSsLyBn3QPnXt4rPOcqrB1GkXOqh+91467vf
8Fq3tYLxfxiYkohO8LWK4fFt1v4OTQIC6z3yBVG+hCmrDzcK7fMePll2+TLxzZ9yjrlob0
iXBEckOVXSYbGLx2wYPOHp56f/7z0uBaWzyrtZGCHcgjp/BEFHMT7UVouKG5XTrvHhtl9l
4qmlmPTtVm+bsQAD4Oh2UtoH3Ct+R2tmUl4ReeARhqdqD/y5imeo9xkovnFmjPKDqekU8i
OLxXrCHb457EGJIV/1ZnCw0+pSUQzrQBmYNTgDssDbnthxMcxB8AAAD//5RUy2rDMBD8lS
UX2TQxpRTa+t5AT4X2mossK7GILRnJJuTvOys5bkhf6SEO+5pd7Yzkal3QMzeAvuFQzgYU
gqsVaiX10nhGCYM3dseCCseuci1JW0doFuR1mezajlYNxtkiCeZlS0c30kHagQZHjdk1LX
4wGk1eHk5gxpLgswcl7Qqn6MSS+jGmAWVK4j5cp5z3OvTO1uyNnVE/NCZMS8k4U7bBEURm
rE4wkbH7x+XDHSjD/9PtJ2eRiCxTrQwB+K3zOWWVVPuddyPA4tA5fCWG05Nzs1gbrytv1H
6zoBKrwHx5fiVkLf0eiJeQr17anX7T9U+QON7sR2CV3Na0+QLmzZkZrZKR+7Tdef0pEsUu
Mq97LYHKysC3cYb1lKhNm89nd1z2ieM8DvD7lWddGrw6vfaB8THYX5f/25Ko+neO4E1mEY
gpTVDKK5LaOLT2riup0bLW/kIs0KDYIowq6Qfq5KAaDdlgjK7SLG/ARCWxkJZnXdLtgfzF
L8+VIFSOQdfYCd/FeeHoXUR6vnr/x9JEyNV7lx8AAAD//5RWQU7DMBA88wsrl9KWPIIL4g
BSJY5JkJx2kUIdu7JBhN8zu3EcSoXq3BLLTmbGO7N7OPjWueMS4fXZGVEeylpnSyzcYXV/
tLqHbOI6Umm/9rCaB0yC/cIsHpDGSxINpuc85viyIW2zGeOKP3KZjnsvGPa6M0EFGkPrb6
UJzQRV7jruMN9CsJxx3lz+uzcl7E6DKqq6um2q12Zd29o3m6pu1k0hji42O4/kGrjeWOHw
2b7TXtJ+xHZygUUGuuenUdRfEJbqur0m11XI28WQ8zDKX085EGnAVIMOWU7hFAuegT12k9
tSdCnpaLq1aDXawOyWcjGl9JtHogf4X6KTo5vZ92wNND6vVvxGK/XWGYonmIfk6D9BYh0C
CFiFgBTDfcxdZAdLK9EFAi9nY6n66jBoo2cm1FIYP9KmyADcQUKkZ2AtF1hDDr1CBIdpSU
klsCYE1VmwNhGpVbFSelFipamBkiYxJmCteTFNKAG7SBMzDmB+whGOWIOdoB6KQxoUkkSE
MrDxgAgJpcrUHGDPC9jSyMwrAxZuqbplmSmp+UhNDuJiAtlId2DbhNR4QNbvAhSFNIJMiI
kM9RB1UOACK58SYGYD+lOdlGghQTflEVQELDkSwRUGibFUlJpCdhQBAAAA///CFkXwNiYl
8QRv+6LEkgamM7FFGr6gBvZTK5JTC0rgkaOJPepINYPiCIRWsURFH3LJklyZmIfZmCe9jP
NNTckszXXKKU0lzTTs5V1wdiUOozB7GCgBDw0GWGsI2ghEblYTl/fIMofyXJiYTnIEphel
plIlBt2A7OISd9KNwx6FPpm5qbgMg0UiAAAA//+UWD1PwzAQnfkXViZDahSlomRHDAwsiL
FLRC0SVXEKtqn49zz77DiFfIgxzuXsu3fn3HszICIN/8FqyXwVEjciPeK8+Nb+EY+0gRud
DB9A+UytzEhMcsTUTOCJm6bVLZxg/SiHyc8HO8HSPmXXf8n0FU3qbGmHoe3FUX4LLy7E4n
Flym4BqSObWUp773Wc7LX3i05zKLflZsfy8q7YVKQ4zJMY04A+HQQqwHYqTkS8c+FFlU1Q
3p2wh+aZiPPCB0GQr+5I8z1tmAconlRr0KAAitLq2wtkTzSO7JFeExlCf5Cj5V+zuaop3T
4bu8JnoyqSZsanwMJ5hJbGnq7nbCKLI6sQaUivVROxjpwyHtzi6WMlLTC8cuoIft4s2+95
UEjL6t5Fsi2qiOvy3pfVFw+Q3bz4N/7yS299LnElPstz6DB+biQ5fpdd/abFKag9PArDwi
qcFzWK/9+Azg8AAAD//4xY207DMAx97l9EvKzViMSQkJg0xI/w0q1ZF1SSKE2p+HuO7Wxd
WRE8bUp9O8eOk5h8H2CMoPDMRmDncCRlo3WNp+Fb9N30guoXjIikWnHxLZkKERibzizUyJ
WBnCxmcft0v9mCxs0z/Z4rwh5lioe0fyA/9buPXGSUiwL772fxMTGfNqYBBXFZoBdpR1cR
/KdF9lvA/rV63k+xHqdxWtkZNNDSupPdg93grUuwQLQwsh5tVUWTponbfzXQ8NBHK6kpGj
8RmT5IXAzLwFIOs+xrMIurzBB72YKFOGt98hrvzaj2hibJOq+PJ0ulxcztXlTJYVTKuKYq
qAtT4ajHzapH925fEfyS3kyNCS9on9TxcKKp1lhHnD1v8Y6+y5GT3V/lDfomxgE3MFASBh
BieAKng8gzOmwyKSYf8kYkgtJZohxcZ3Aelq1JOuGFr0P0uC2kL2qJoE4DvHWOHssPlVrN
Ort4IM9/arJ0kSGUkGwd7o+u0f6oaTJQnQmZS07++IyVaej6wgTj4WQv+ZyJ/o5T9GfI1s
TMLa7s6Sb6b86sIAdBGAie/YmkkggVr4YP+AcFmpAQJRp9v9Pttm7BRvRGoM1uu7MzQxtl
r3z2ce4yF2KZBSWkNJIF5N0AxvHWdxg6sDd91+ajV7aVbSFBBrrU4FKld/sllOp05U2kNW
jriR+s+VDLpP4RboZ5QjiYnKFrZzL1j4INzPXCFEvUkhfUTXXToFdvrI4qoWMz06FExSfx
AnJY84lmg/LDG4c8jLue9FsrD6VWnzTYjfsrhBMOGYJKBVdTatSqqja6ErdfCUENNzuC6W
bfMPtx5tueaISBk8Uy7bGz5dEiy7Iv8WInhYpxNdd2HadhWO4nQ6QJCgqP3DRCOYnfgOom
TcB5h6ZYI74l5B27rkWrtdCsA39PFfQFAAD//yIqzUDTOd6EQ6otmMkGjy3QxgncFgIpSJ
eTGukHj10oqQe3feCaj2g7FdShbXKo3eSkRF2s6RCpgYhepECaiMQWTESFvjaV8i9e+9Bi
ALed0MqLrFgAuwCYnyIgDSNtpJUV9vb2MBfCG94VqA1vSKNPC9jqA7ZqQR7JSU0uAVZviD
YurHkFrPkVNGCtbHBFDeQgKwC1pGAKQGyQgSXQBgVGIxAeFtjyECw4oA2BdAAAAAD//0Jr
KIKqbVAKArfiwO0DBQ1dBQ19oFgRMIh0M1LBHXcFI01NuGqk5gNWkyHNRGwmYzMWzVRN1K
RAQSGmjb/iI90KzBIMuxXwwksbfzUB6lP7JmbmIZo7ZuY6hiYK2iYGRsgLSLA18OES8EYk
vH2HJAnOS+DEhmiwQuXAdmcjdzHBC4EUYooQakjuPkBb2YT6BpQ15ElsxxPdjMfaikcKDP
Qo0IZJYJkgBSUoRKENSRDgiIB2oRCR4AFfApMKWpQDchhSBEIjALMLBo1bkHLU+AWlIxNz
C9A6JFMDeLOZE54cAAAAAP//gi5cQCoeoQJYAh4qBoo6A01YXxnZFCUlRKseKJYDqm8gpg
ILvZQS6BojSACD29N5+dDVOBp2CgVFYA0ge+xsIZohQpBSDqdyaIEB9pEdqMjNS4fbhDBB
Aa4mtRDUtsfwsAGKWohilCVHuqAhPV1gYVUAnsiGBwA072TmgOauc6ELiUwsLEGDP6aGFr
Ccy4lQBx4bzE1FDj/wSCqWlAPKEWA59ZJ8eIjDOtH4Fi7AQoVgkOAZOCvADCWoZoTfQZUc
eE0VeHkQNFJALkaEOUQKkhrw+RBqLchswADrBcajlioAAA==
-------------- next part --------------
## 昨日、N+I 2001 の IPv6 showcase で *働く* かずさんを見てきました。:-)