[mew-dist 27592] patch for mew-summary-thread-region

KOIE Hidetaka ( 鯉江英隆 ) hide at example.com
2007年 3月 8日 (木) 20:00:56 JST


tr のスレッド表示で出てこないスパムメッセージがあって、調べてみたら
message-id: <hoge> と references: <hoge> が同じ文字列なのが原因でした。

my-idをdbに登録するタイミングを遅らせて
スレッドが自己ループしていると
topにリストされるようにしてみました。

Index: mew-thread.el
===================================================================
RCS file: /cvsmew/mew/mew-thread.el,v
retrieving revision 1.132
diff -u -F^( -r1.132 mew-thread.el
--- mew-thread.el	4 Jan 2007 06:49:15 -0000	1.132
+++ mew-thread.el	8 Mar 2007 10:55:05 -0000
@@ -287,8 +287,6 @@ (defun mew-summary-thread-region (beg en
 	       (mew-thread-set-line me line)
 	       (if (string= my-id "")
 		   (setq top (cons me top))
-		 (mew-thread-set-myid me my-id)
-		 (set (intern my-id db) me)
 		 (if (string= prnt-id "")
 		     (setq top (cons me top))
 		   (mew-thread-set-prntid me prnt-id)
@@ -298,7 +296,9 @@ (defun mew-summary-thread-region (beg en
 		     (setq prnt-cld (mew-thread-get-child prnt))
 		     (if prnt-cld
 			 (nconc prnt-cld (list me))
-		       (mew-thread-set-child prnt (list me))))))))))
+		       (mew-thread-set-child prnt (list me)))))
+		 (mew-thread-set-myid me my-id)
+		 (set (intern my-id db) me))))))
        ;;
        (if (null me)
  	   (message "No target messages")

--
KOIE Hidetaka <hide at example.com>



Mew-dist メーリングリストの案内