svnno****@sourc*****
svnno****@sourc*****
2010年 12月 10日 (金) 14:59:22 JST
Revision: 1194 http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1194 Author: kiri_feather Date: 2010-12-10 14:59:22 +0900 (Fri, 10 Dec 2010) Log Message: ----------- RemovePostReserveの処理簡略化 Modified Paths: -------------- trunk/Tween/StatusDictionary.vb -------------- next part -------------- Modified: trunk/Tween/StatusDictionary.vb =================================================================== --- trunk/Tween/StatusDictionary.vb 2010-12-10 01:40:57 UTC (rev 1193) +++ trunk/Tween/StatusDictionary.vb 2010-12-10 05:59:22 UTC (rev 1194) @@ -612,15 +612,8 @@ Public Sub RemovePostReserve(ByVal id As Long, ByRef post As PostClass) SyncLock LockObj post = Nothing - If _statuses.ContainsKey(id) Then - post = _statuses(id).Copy - Else - 'DM - Dim tb As TabClass = Me.GetTabByType(TabUsageType.DirectMessage) - If tb.Contains(id) Then - post = tb.Posts(id).Copy - End If - End If + Dim tmp As PostClass = Me.Item(id) + If tmp IsNot Nothing Then post = tmp.Copy Me._deletedIds.Add(id) End SyncLock End Sub