YouTubeのサムネイルが二重に登録されるバグ修正

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@914 e39ad16e-3079-482e-bb30-4b4d378143b6

diff --git a/Tween/Thumbnail.vb b/Tween/Thumbnail.vb
index 6f6c81c..5deec3f 100644 (file)
--- a/Tween/Thumbnail.vb
+++ b/Tween/Thumbnail.vb
@@ -1067,18 +1067,12 @@ Public Class Thumbnail
                     If _img Is Nothing Then Return False
                     args.pics.Add(New KeyValuePair(Of String, Image)(args.url.Key, _img))
                     args.tooltiptext.Add(New KeyValuePair(Of String, String)(args.url.Key, sb.ToString.Trim()))
+                    Return True
                 End If
             End If
 
         End If
-        Dim img As Image = (New HttpVarious).GetImage(args.url.Value, args.url.Key, 10000, args.errmsg)
-        If img Is Nothing Then
-            Return False
-        End If
-        ' 成功した場合はURLに対応する画像、ツールチップテキストを登録
-        args.pics.Add(New KeyValuePair(Of String, Image)(args.url.Key, img))
-        args.tooltiptext.Add(New KeyValuePair(Of String, String)(args.url.Key, ""))
-        Return True
+        Return False
     End Function
 
 #End Region