Navigator for 2ch

書き込みのときに、navi2ch-article-bufferを置き換えるの
ではなくて、分割して下にnavi2ch-message-buffeを表示する
ようにしない？その方が引用したりしやすいでしょ。
こんな具合でいいかな？

--- navi2ch-message.el.org Fri Dec 15 15:54:58 2000
+++ navi2ch-message.el Fri Dec 15 16:27:36 2000
@@ -35,6 +35,8 @@
(define-key navi2ch-message-mode-map "\C-c\C-k" 'navi2ch-message-exit))

(defun navi2ch-message-write-message (bord article)
+ (split-window-vertically navi2ch-board-window-height)
+ (other-window 1)
(setq navi2ch-message-window-configuration
(current-window-configuration))
(switch-to-buffer (get-buffer-create navi2ch-message-buffe-name))
@@ -67,8 +69,12 @@

(defun navi2ch-message-exit ()
(interactive)
- (kill-buffer (current-buffer))
- (set-window-configuration navi2ch-message-window-configuration))
+ (delete-windows-on (get-buffer navi2ch-message-buffe-name))
+ (bury-buffer navi2ch-message-buffe-name)
+ (let ((win (get-buffer-window navi2ch-article-buffer-name)))
+ (if win
+ (select-window win)
+ (switch-to-buffer navi2ch-article-buffer-name))))

(defun navi2ch-message-mode ()
(interactive)