From 88dbeb16e6ea31e772f8e9d3cb12e1feb8245d6b Mon Sep 17 00:00:00 2001
From: anis774 <anis774@users.sourceforge.jp>
Date: Fri, 31 Dec 2010 02:23:59 +0000
Subject: [PATCH] =?utf8?q?=E3=83=A6=E3=83=BC=E3=82=B6=E3=83=BCTL=E3=82=BF?=
 =?utf8?q?=E3=83=96=E3=81=A7=E5=89=8D=E3=83=87=E3=83=BC=E3=82=BF=E5=8F=96?=
 =?utf8?q?=E5=BE=97=E3=81=8C=E5=8B=95=E3=81=8B=E3=81=AA=E3=81=8B=E3=81=A3?=
 =?utf8?q?=E3=81=9F=E3=81=AE=E3=82=92=E4=BF=AE=E6=AD=A3?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@1286 e39ad16e-3079-482e-bb30-4b4d378143b6
---
 Tween/Twitter.vb | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Tween/Twitter.vb b/Tween/Twitter.vb
index a2ce6d94..a5d06d5a 100644
--- a/Tween/Twitter.vb
+++ b/Tween/Twitter.vb
@@ -1370,6 +1370,7 @@ Public Class Twitter
         For Each status As TwitterDataModel.Status In items
             Dim item As PostClass = CreatePostsFromStatusData(status)
             If item Is Nothing Then Continue For
+            If item.Id < tab.OldestId Then tab.OldestId = item.Id
             item.IsRead = read
             If item.IsMe AndAlso Not read AndAlso _readOwnPost Then item.IsRead = True
             If tab IsNot Nothing Then item.RelTabName = tab.TabName
-- 
2.11.0