svnno****@sourc*****
svnno****@sourc*****
2011年 9月 30日 (金) 02:02:33 JST
Revision: 1608
http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1608
Author: syo68k
Date: 2011-09-30 02:02:33 +0900 (Fri, 30 Sep 2011)
Log Message:
-----------
関連発言取得の際に、ツイートに含まれるツイートのURLを読み込まなくなっていたバグを修正
Modified Paths:
--------------
trunk/Tween/Resources/ChangeLog.txt
trunk/Tween/Twitter.vb
-------------- next part --------------
Modified: trunk/Tween/Resources/ChangeLog.txt
===================================================================
--- trunk/Tween/Resources/ChangeLog.txt 2011-09-28 17:34:36 UTC (rev 1607)
+++ trunk/Tween/Resources/ChangeLog.txt 2011-09-29 17:02:33 UTC (rev 1608)
@@ -1,5 +1,7 @@
更新履歴
+==== Ver 1.1.0.0(2011/**/**)
+ * FIX: 関連発言取得の際に、ツイートに含まれるツイートのURLを読み込まなくなっていたバグを修正
==== Ver 1.0.9.0(2011/9/29)
* FIX: アカウントの再認証時に、認証後情報が反映されないバグ修正
* FIX: t.coと他の短縮URLが混ざると、URLが展開されないバグ修正
Modified: trunk/Tween/Twitter.vb
===================================================================
--- trunk/Tween/Twitter.vb 2011-09-28 17:34:36 UTC (rev 1607)
+++ trunk/Tween/Twitter.vb 2011-09-29 17:02:33 UTC (rev 1608)
@@ -2028,7 +2028,7 @@
'MRTとかに対応のためツイート内にあるツイートを指すURLを取り込む
- Dim ma As MatchCollection = Regex.Matches(tab.RelationTargetPost.Text, "href=""https?://twitter.com/(#!/)?(?<ScreenName>[a-zA-Z0-9_]+)(/status(es)?/(?<StatusId>[0-9]+))""")
+ Dim ma As MatchCollection = Regex.Matches(tab.RelationTargetPost.Text, "title=""https?://twitter.com/(#!/)?(?<ScreenName>[a-zA-Z0-9_]+)(/status(es)?/(?<StatusId>[0-9]+))""")
For Each _match As Match In ma
Dim _statusId As Int64
If Int64.TryParse(_match.Groups("StatusId").Value, _statusId) Then