Changeset 31356

Timestamp:

03/19/09 10:58:09 (4 years ago)

Author:

kiri_feather

Message:

PreProcessUrlで置換があった場合は、頭から再実行

Files:

• lang/vb2005/Tween/Tween/Twitter.vb (modified) (1 diff)

lang/vb2005/Tween/Tween/Twitter.vb

@@ -923 +923 @@
                 Dim replacedUrl As String = IDNDecode(urlStr)
                 If replacedUrl Is Nothing Then Continue Do
+                If replacedUrl = urlStr Then Continue Do
 
                 orgData = orgData.Replace("<a href=""" + urlStr, "<a href=""" + replacedUrl)
+                posl2 = 0
             Else
                 Exit Do