16/06/05 09:14:27.18 .net
defun navi2ch-message-sendlog-subject-with-volume のこの辺が怪しい?
(when limit
(dolist (x subject-list)
(let ((sbj (cdr (assq 'subject x)))
num)
(when (and (or (and (string= base sbj)
(setq num 1))
(and (string-match regexp sbj)
(setq num
(string-to-number (match-string 1 sbj)))))
(> num max))
(setq max num
article x))))