Navigator for 2ch

>>455 (not 1)さん

報告遅れてすまんです。010324 版でも >>451 と同様のエラーが発
生しました。.emacs の内容を navi2ch 最小限にしても駄目です。
*.elc を作らずに起動して backtrace を取りました。

split-window(nil 10)
# bind (old-w old-point size window-full-p new-w bottom moved arg)
split-window-vertically(10)
(progn (dolist (x ...) (when x ...)) (split-window-vertically navi2ch-board-window-height) (other-window 1) (let (state) (setq state ...) (save-excursion ... ...)))
)
(if article (progn (dolist ... ...) (split-window-vertically navi2ch-board-window-height) (other-window 1) (let ... ... ...)) (message "can't select this line!"))
)
# bind (buf board article item)
(let* ((item ...) (article ...) (board ...) (buf ...)) (if article (progn ... ... ... ...) (message "can't select this line!")))
)
# bind (force)
navi2ch-bm-select-article(nil)
# bind (command-debug-status)
call-interactively(navi2ch-bm-select-article)
# (condition-case ... . error)
# (catch top-level ...)

以下はその時の .emacs

(setq load-path (append '("~/xelisp") load-path))

(require 'navi2ch)
(cond
((string-match "XEmacs" emacs-version)
(require 'navi2ch-mona)
(setq navi2ch-mona-enable-board-list '("mona")
navi2ch-mona-pack-space-p t)
(add-hook 'navi2ch-article-arrange-message-hook
'navi2ch-mona-arrange-message)))