* 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

@@ -1,3 +1,12 @@
+2008-01-23  Naohiro Aota  <nao.aota@gmail.com>
+
+	* navi2ch-article.el (navi2ch-article-get-last-read-number):
+	article $B$=$N$b$N$G$O$J$/!"(B article $B$N%3%T!<$r(B
+	navi2ch-article-load-info() $B$KEO$9$h$&$K!#(B
+
+	* 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):

navi2ch-article.el

@@ -1389,7 +1389,7 @@ FIRST $B$,(B nil $B$J$i$P!"%U%!%$%k$,99?7$5$l$F$J$1$l$P2?$b$7$J$$!#(B"
 			    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

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