[Mew-dist 11601] Re: Multipart?
Kazu Yamamoto ( 山本和彦 )
kazu at example.com
1999年 12月 2日 (木) 12:14:29 JST
From: Hideyuki SHIRAI (白井秀行) <shirai at example.com>
Subject: [Mew-dist 11600] Re: Multipart?
> (let ((orig-table (copy-syntax-table))
> word)
> (unwind-protect
> (progn
> (modify-syntax-entry ?* "w")
> (modify-syntax-entry ?' "w")
> (modify-syntax-entry ?/ "w")
> (setq word (or (sdic-word-at-point) (sdic-read-from-minibuffer))))
> (set-syntax-table orig-table))
>
> の部分が何かしら Mew とぶつかっていると思ったので、上記の
> modify-syntax-entry しているところをコメントアウトしたら問題が無
> くなりました。
分かりました。
(modify-syntax-entry ?/ "w")
で、'/' を文字にしているのが問題です。
Mew では、(capitalize "text/plain") が Text/Plain を返すことを期待して
います。(modify-syntax-entry ?/ "w") とすると、
(capitalize "Text/plain") となります。
とって、第1パートが Text/Plain でないと勘違いし、マルチパートにくるん
でしまう...
どうしようかなぁ。
--かず
Mew-dist メーリングリストの案内