Re: メールアーカイブの References

[ABE Yasushi ( 阿部 靖司 ) <yasushi@xxxxxxxxx>]

あべです

At Thu, 14 Jun 2001 22:44:56 +0900,
Akihiro Arisawa wrote:
> > ちょっと息抜きと、素敵な解説(*)を発見したので、javaカンファレンスの
> > servlet-mlのbackendを作ってみました。
> 
> 書いてみた甲斐がありました:-)

やはり、ここの方でしたか。
webサイトの方のメールアドレスと違ったんで気づきませんでした^^;
# bbdbは検索してみたんですが。

このドキュメントのおかげで、なんとなくlunaとかshimbunのbackendとかが見
えてきました。

# lunaってドキュメントが見あたらなくて。。。

> > このバックエンドをWanderlustから使ってみたのですが、スレッドがまったく
> > 繋がりません。
> > 一応、referencesやmessage-idを取得できているようなので、うまくいきそう
> > な気もするんですが。。。
> 
> Wanderlust で Summary を生成する時は、まだ記事を取得していないので、
> reference などは利用されません。そのため、Subject から thread を生成す
> ることになるのですが、"Re" という文字列が含まれていないため、
> `wl-summary-search-parent-by-subject-regexp' に適合せずに、繋がらない
> ようです。

ああ、なるほど。そういうことでしたか。
Re:が付いたままのbusiness-mlなどでは、スレッドが繋がることを確認しまし
た。servlet-mlが加工されてただけだったんですね。

> > どこかまずいところがあるのでしょうか?
> 
> ということで、sb-javaconf.el は問題無いと思いますので、後程代理 commit
> させてもらおうと思います。

> sb-javaconf.el を commit しました。

あ。ええと、これ、実験的にservlet-mlだけだったので、ほかのmlも読めるよ
うにしました。
申し訳ありませんが、commitおねがいします。

---
ABE Yasushi

Index: sb-javaconf.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/shimbun/sb-javaconf.el,v
retrieving revision 1.1
diff -u -r1.1 sb-javaconf.el
--- sb-javaconf.el	2001/06/14 16:55:11	1.1
+++ sb-javaconf.el	2001/06/15 01:36:30
@@ -31,7 +31,9 @@
 (luna-define-class shimbun-javaconf (shimbun-mhonarc) ())
 
 (defvar shimbun-javaconf-url "http://www.java-conf.gr.jp/archives/";)
-(defvar shimbun-javaconf-groups '("servlet-ml"))
+(defvar shimbun-javaconf-groups '("servlet-ml" "business-ml" "duke-in-the-box-ml"
+				  "jfriends-ml" "JGT-ml" "jini-ml" "ejb-ml" "cm-ml"
+				  "horb-ml" "talk-ml"))
 (defvar shimbun-javaconf-reverse-flag nil)
 (defvar shimbun-javaconf-litemplate-regexp
   "<strong><a NAME=\"\\([0-9]+\\)\" HREF=\"\\(msg[0-9]+\.html\\)\">\\([^<]+\\)\n</a></strong> <em>\\([^<]+\\)\n</em>")
@@ -48,7 +50,7 @@
 (luna-define-method shimbun-get-headers ((shimbun shimbun-javaconf)
 					 &optional range)
   (let* ((group (shimbun-current-group-internal shimbun))
-	 (regexp (format "<a href=\"\\(%s/mail\\([0-9]+\\)\.html\\)\"" (regexp-quote group)))
+	 (regexp (format "<a href=\"\\(%s/\\(mail[0-9]+\.html\\)?\\)\"" (regexp-quote group)))
 	 (case-fold-search t)
 	 (pages (shimbun-header-index-pages range))
 	 (count 0)