Navi2ch for Emacs (part 7)

Board モードにて、更新されていた場合にレスの増分を表示するというのは
どうでしょうか。

Index: navi2ch-board.el
===================================================================
RCS file: /cvsroot/navi2ch/navi2ch/navi2ch-board.el,v
retrieving revision 1.49
diff -u -r1.49 navi2ch-board.el
--- navi2ch-board.el16 Oct 2002 16:48:07 -00001.49
+++ navi2ch-board.el19 Oct 2002 04:38:15 -0000
@@ -266,7 +266,16 @@
(navi2ch-bm-insert-subject
article i
(cdr (assq 'subject article))
- (format "(%4s)" (cdr (assq 'response article)))
+ (let ((num (cdr (assq 'response article))))
+ (if (and navi2ch-board-check-updated-article-p
+ (navi2ch-board-updated-article-p article seen))
+ (format "(%4s (+%d))" num
+ (- (string-to-number num)
+ (string-to-number
+ (or (cdr (assoc (cdr (assq 'artid article))
+ navi2ch-board-old-subject-alist))
+ "0"))))
+ (format "(%4s)" num)))
(cond ((and navi2ch-board-check-updated-article-p
(navi2ch-board-updated-article-p article seen))
'updated)