>>200
navi2ch-message-ident
"$Id: navi2ch-message.el,v 1.58.2.1 2006/10/29 12:47:06 nanashi Exp $"
navi2ch-message-sendlog-response-limit
1000
で、最後の lisp を評価するとエラーになりました↓
Debugger entered--Lisp error: (void-variable base)
(string= base sbj)
(and (string= base sbj) (setq num 1))
(or (and (string= base sbj) (setq num 1)) (and (string-match regexp sbj) (setq num ...)))
(and (or (and ... ...) (and ... ...)) (> num max))
(if (and (or ... ...) (> num max)) (progn (setq max num article x)))
(when (and (or ... ...) (> num max)) (setq max num article x))
(let ((sbj ...) num) (when (and ... ...) (setq max num article x)))
(while --cl-dolist-temp-- (setq x (car --cl-dolist-temp--)) (let (... num) (when ... ...)) (setq --cl-dolist-temp-- (cdr --cl-dolist-temp--)))
(let ((--cl-dolist-temp-- ...) x) (while --cl-dolist-temp-- (setq x ...) (let ... ...) (setq --cl-dolist-temp-- ...)) (setq x nil) article)
(catch (quote --cl-block-nil--) (let (... x) (while --cl-dolist-temp-- ... ... ...) (setq x nil) article))
(cl-block-wrapper (catch (quote --cl-block-nil--) (let ... ... ... article)))
(block nil (let (... x) (while --cl-dolist-temp-- ... ... ...) (setq x nil) article))
(dolist (x (navi2ch-board-get-updated-subject-list navi2ch-message-sendlog-board) article) (let (... num) (when ... ...)))
(let (article) (dolist (x ... article) (let ... ...)))
eval((let (article) (dolist (x ... article) (let ... ...))))
eval-last-sexp-1(t)
eval-last-sexp(t)
eval-print-last-sexp()
call-interactively(eval-print-last-sexp)