Changeset 30982

Timestamp:

03/09/09 23:41:05 (4 years ago)

Author:

syo68k

Message:

文字列分解を単純化した

Files:

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

lang/vb2005/Tween/Tween/Twitter.vb

@@ -1013 +1013 @@
 
                 ' ドメイン名をPunycode展開
-                Dim Domain As String = (urlStr.Split(New String() {"/"}, StringSplitOptions.None))(2)
+                Dim Domain As String = urlStr.Split("/"c)(2)
                 Dim AsciiDomain As String = IDNConveter.GetAscii(Domain)
                 Dim replacedUrl As String = urlStr.Replace("://" + Domain + "/", "://" + AsciiDomain + "/")