From cf37252f07490bec7611d46dff7fbe82c9bd9c70 Mon Sep 17 00:00:00 2001
From: nawota <nawota>
Date: Wed, 23 Jan 2008 10:03:59 +0000
Subject: [PATCH] * navi2ch-article.el (navi2ch-article-get-last-read-number):
 Pass not article itself, but copy of it to navi2ch-article-load-info() .

* navi2ch-board.el (navi2ch-board-insert-subjects): Revert the
last change.
---
 ChangeLog          | 9 +++++++++
 navi2ch-article.el | 2 +-
 navi2ch-board.el   | 2 +-
 3 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 1c8a8e0..db9a719 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2008-01-23  Naohiro Aota  <nao.aota@gmail.com>
+
+	* navi2ch-article.el (navi2ch-article-get-last-read-number):
+	article そのものではなく、 article のコピーを
+	navi2ch-article-load-info() に渡すように。
+
+	* navi2ch-board.el (navi2ch-board-insert-subjects): Revert the
+	last change.
+
 2008-01-22  Naohiro Aota  <nao.aota@gmail.com>
 
 	* navi2ch-vars.el (navi2ch-article-message-filter-list):
diff --git a/navi2ch-article.el b/navi2ch-article.el
index 5276e7f..ef1e06d 100644
--- a/navi2ch-article.el
+++ b/navi2ch-article.el
@@ -1389,7 +1389,7 @@ FIRST が nil ならば、ファイルが更新されてなければ何もしない。"
 			    navi2ch-article-important-mode)
 			(cdr (assq 'number navi2ch-article-current-article))
 		      (navi2ch-article-get-current-number))))
-      (setq article (navi2ch-article-load-info board article))
+      (setq article (navi2ch-article-load-info board (copy-alist article)))
       (setq hide (cdr (assq 'hide article))
 	    num (cdr (assq 'number article))))
     (when num
diff --git a/navi2ch-board.el b/navi2ch-board.el
index 5ab92b5..ec208ba 100644
--- a/navi2ch-board.el
+++ b/navi2ch-board.el
@@ -316,7 +316,7 @@
 		 (read (and navi2ch-board-insert-subject-with-unread
 			    (navi2ch-article-get-last-read-number
 			     navi2ch-board-current-board
-			     (copy-tree article)))))
+			     article))))
 	     (concat "("
 		     (format "%4s" res)
 		     (and navi2ch-board-insert-subject-with-diff