jbbs.shitaraba.comの板でもIDでフィルタしたくなったので、
こんなの作ってみたんですけど……こんな感じでいいんでしょうか？
Lispよく知らないので変なことしてるかも。

Index: navi2ch-jbbs-shitaraba.el
===================================================================
RCS file: /cvsroot/navi2ch/navi2ch/navi2ch-jbbs-shitaraba.el,v
retrieving revision 1.19
diff -u -r1.19 navi2ch-jbbs-shitaraba.el
--- navi2ch-jbbs-shitaraba.el25 Dec 2002 09:45:14 -00001.19
+++ navi2ch-jbbs-shitaraba.el3 Sep 2003 06:23:40 -0000
@@ -181,10 +181,16 @@
(defun navi2ch-js-make-article (&optional subject)
(let ((mail (match-string 3))
(name (match-string 4))
-(date (match-string 5))
+(date (navi2ch-js-normalize-id-part (match-string 5)))
(contents (match-string 6)))
(format "%s<>%s<>%s<>%s<>%s\n"
name (or mail "") date contents (or subject ""))))
+
+(defun navi2ch-js-normalize-id-part (date)
+ (save-match-data
+ (if (string-match "^\\([^ ]+ [0-9:]+\\) .*\\[ \\([^ ]+\\) \\].*$" date)
+(format "%s ID:%s" (match-string 1 date) (match-string 2 date))
+ date)))

(navi2ch-multibbs-defcallback navi2ch-js-article-callback
(jbbs-shitaraba &optional diff)