Hopefully solve the issues reported in text 15552713

src/ChangeLog

+2007-07-20  Hans Eric Svensson  <eric+lyskom@lysator.liu.se>
+	
+	* view-text.el (lyskom-follow-comments): Adjusted to take into
+	account that text-read-p doesn't know if a text *should* be read,
+	it only only knows if a text *is marked* as read.
+
 2007-07-14  Per Cederqvist  <ceder@lysator.liu.se>
 
 	Make sure all elisp files end in a newline.

src/view-text.el

@@ -546,8 +546,9 @@ lyskom-reading-list."
                (let ((text-stat (blocking-do 'get-text-stat no)))
                  (if (and text-stat
                           (or review-tree
-                              (not (lyskom-text-read-p text-stat t))
-                              kom-follow-comments-outside-membership))
+                              kom-follow-comments-outside-membership
+                              (and (lyskom-member-of-at-least-one-p (lyskom-text-recipients text-stat))
+                                   (not (lyskom-text-read-p text-stat t)))))
                      (setq comments (cons no comments)))))
               ((memq no mx-attachments-in)
                (lyskom-skip-attachments no mark-as-read))))
@@ -572,8 +573,9 @@ lyskom-reading-list."
 	(let ((text-stat (blocking-do 'get-text-stat no)))
 	  (if (or review-tree
 		  (and text-stat
-		       (or (not (lyskom-text-read-p text-stat))
-                           kom-follow-comments-outside-membership)))
+                       (or kom-follow-comments-outside-membership
+                           (and (lyskom-member-of-at-least-one-p (lyskom-text-recipients text-stat))
+                                (not (lyskom-text-read-p text-stat t))))))
 	      (setq footnotes (cons no footnotes)))))
       (if footnotes
 	  (read-list-enter-read-info