* sb-mixi.el (shimbun-mixi-get-headers): Stop getting comment's

headers when it was already shown.

diff --git a/ChangeLog b/ChangeLog
index 1ca7409..7d75df6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2007-01-18  OHASHI Akira  <bg66@koka-in.org>
 
+       * sb-mixi.el (shimbun-mixi-get-headers): Stop getting comment's
+       headers when it was already shown.
+
+2007-01-18  OHASHI Akira  <bg66@koka-in.org>
+
        * mixi.el (mixi-friend-nick-regexp): Follow the change of mixi.
        (mixi-friend-page): Ditto.
        (mixi-realize-friend): Ditto.

diff --git a/sb-mixi.el b/sb-mixi.el
index 6761384..0c5f318 100644 (file)
--- a/sb-mixi.el
+++ b/sb-mixi.el
@@ -257,6 +257,9 @@ of mixi object."
                (when (mixi-object-p object)
                  (let ((class (mixi-object-class object))
                        (id (shimbun-mixi-make-message-id object)))
+                   (when (and (eq class 'mixi-comment)
+                              (shimbun-search-id shimbun id))
+                     (throw 'stop nil))
                    (push
                     (shimbun-create-header
                      0