svnno****@sourc*****
svnno****@sourc*****
2010年 11月 13日 (土) 09:38:17 JST
Revision: 1064
http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1064
Author: syo68k
Date: 2010-11-13 09:38:17 +0900 (Sat, 13 Nov 2010)
Log Message:
-----------
Sourceに含まれる短縮URLも展開するようにした
Modified Paths:
--------------
trunk/Tween/Twitter.vb
-------------- next part --------------
Modified: trunk/Tween/Twitter.vb
===================================================================
--- trunk/Tween/Twitter.vb 2010-11-12 13:21:09 UTC (rev 1063)
+++ trunk/Tween/Twitter.vb 2010-11-13 00:38:17 UTC (rev 1064)
@@ -2488,7 +2488,7 @@
If Not post.Source.Contains("</a>") Then
post.Source += "</a>"
End If
- post.SourceHtml = String.Copy(post.Source)
+ post.SourceHtml = String.Copy(ShortUrl.Resolve(PreProcessUrl(post.Source)))
Dim mS As Match = Regex.Match(post.Source, ">(?<source>.+)<")
If mS.Success Then
post.Source = HttpUtility.HtmlDecode(mS.Result("${source}"))