1001

公式RTの強制重複除外。テスト実装

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@1490 e39ad16e-3079-482e-bb30-4b4d378143b6

diff --git a/Tween/My Project/AssemblyInfo.vb b/Tween/My Project/AssemblyInfo.vb
index 9787687..e4f3d92 100644 (file)
--- a/Tween/My Project/AssemblyInfo.vb
+++ b/Tween/My Project/AssemblyInfo.vb
@@ -55,5 +55,5 @@ Imports System.Runtime.InteropServices
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
 <Assembly: AssemblyVersion("0.1.0.0")> 
-<Assembly: AssemblyFileVersion("1.0.0.0")> 
+<Assembly: AssemblyFileVersion("1.0.0.1")> 
 

diff --git a/Tween/StatusDictionary.vb b/Tween/StatusDictionary.vb
index 75f6694..fff9ed2 100644 (file)
--- a/Tween/StatusDictionary.vb
+++ b/Tween/StatusDictionary.vb
@@ -1024,6 +1024,8 @@ Public NotInheritable Class TabInformations
                         End If
                     Else
                         If Item.IsFav AndAlso Item.RetweetedId > 0 Then Item.IsFav = False
+                        '既に持っている公式RTは捨てる
+                        If Me._retweets.ContainsKey(Item.RetweetedId) Then Exit Sub
                         _statuses.Add(Item.StatusId, Item)
                     End If
                     If Item.RetweetedId > 0 Then