svnno****@sourc*****
svnno****@sourc*****
2010年 11月 11日 (木) 02:29:21 JST
Revision: 1056 http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1056 Author: syo68k Date: 2010-11-11 02:29:21 +0900 (Thu, 11 Nov 2010) Log Message: ----------- クエリまたはフラグメント部分に?を含むURLの認識に失敗するバグを修正 Modified Paths: -------------- trunk/Tween/Tween.vb -------------- next part -------------- Modified: trunk/Tween/Tween.vb =================================================================== --- trunk/Tween/Tween.vb 2010-11-10 02:20:54 UTC (rev 1055) +++ trunk/Tween/Tween.vb 2010-11-10 17:29:21 UTC (rev 1056) @@ -7484,7 +7484,7 @@ "(?<url>(?<protocol>https?://)" + _ "(?<domain>(?:[\.-]|[^\p{P}\s])+\.[a-z]{2,}(?::[0-9]+)?)" + _ "(?<path>/[a-z0-9!*'();:&=+$/%#\[\]\-_.,~@^]*[a-z0-9)=#/]?)?" + _ - "(?<query>\?[a-z0-9!*'();:&=+$/%#\[\]\-_.,~@]*[a-z0-9_&=#/])?)" + "(?<query>\?[a-z0-9!*'();:&=+$/%#\[\]\-_.,~@?]*[a-z0-9_&=#/])?)" Const nico As String = "^https?://[a-z]+\.(nicovideo|niconicommons|nicolive)\.jp/[a-z]+/[a-z0-9]+$" @@ -8779,9 +8779,9 @@ user = GetUserId() If user Is Nothing Then Return ElseIf Me._curPost IsNot Nothing Then - user = Me._curPost.Name + user = Me._curPost.Name Else - Return + Return End If Dim list As ListElement = Nothing