[mew-dist 18549] Re: '(',')' 謎の動き

[NINOMIYA Hideyuki]

こんにちは	二宮@お四国 です

山本 和彦 様 は Fri, 17 Aug 2001 13:07:47 +0900 (JST) 頃に
    Subject: [mew-dist 18541] Re: '(',')' 謎の動き
    Message-Id: <20010817.130747.119268536.kazu at example.com>
        に於いて以下のようにおっしゃっていました。
※都合により手を加えさせていただく事が有ります。御了承下さいマセヽ...
かず> From: NINOMIYA Hideyuki <nin at example.com>
かず> Subject: [mew-dist 18482] Re: '(',')' 謎の動き
かず> 
かず> > ということで うちで <> になり、'(',')' が期待通りの動きをする為の
かず> > パッチです。
かず> 
かず> 原因は何なのか文章で説明してもらえますか？

Mew 2.0.50 の mew-scan-get-line を edebuger に食わせて確認したところ、
親(In-Reply-To, Referrences)の無い message の場合

(defun mew-scan-get-line (mew-vec WIDTH &optional VIRTUALP)
  (let* ( ...
	 (my-id "") (par-id "") ... first-irt ...) ;; first-irt=nil
     ...
    (when (string-match mew-regex-id (MEW-IRT))
         ... )			;; In-Reply-To 無いので実行されない
    (cond
      ...
     ((string-match mew-regex-id (MEW-REF))
      ... )			;; Referrences 無いので実行されない
     (t				;; 以下が実行される
      (setq par-id first-irt))) ;; par-id <= (first-irt=nil) -> par-id=nil
    (if (null VIRTUALP)
	(setq ld (format "\r <%s> <%s>\n" my-id par-id))
	 ...			;; "\r <xxx> <nil>\n"
      (setq ld (format "\r %s %s <%s> <%s>\n" fld msg my-id par-id)))
         ... ))			;; "\r xxx xxx <xxx> <nil>\n"

かず> あと、これが再現するメールを、個人宛に送って頂けませんか？

In-Reply-To, Referrences 共に無い message は全て以上のようになると
思うのですが、かず さんとこでは 親ID=<nil> となっている message は
ございませんでしょうか ?
--─
ICQ UIN:57442553                          二宮 秀幸@愛媛 鬼北 広見町
PGP-Fingerprint:  6C59 EC08 5B23 6490 44D0  7CD3 DA40 219F 7114 8553
PGP-Public-Key:    http://user.shikoku.ne.jp/~nin/pgp/public-key.txt
mailto:nin at example.com   http://user.shikoku.ne.jp/~nin/index.html
mailto:nin at example.com http://home.jp.freebsd.org/~nin/index.html