タイムアウトの際にエラーメッセージを返していなかったバグを修正

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

diff --git a/Tween/Connection/HttpVarious.vb b/Tween/Connection/HttpVarious.vb
index d633759..8ac1bce 100644 (file)
--- a/Tween/Connection/HttpVarious.vb
+++ b/Tween/Connection/HttpVarious.vb
@@ -62,6 +62,11 @@ Public Class HttpVarious
             If img IsNot Nothing Then img.Tag = url
             If ret = HttpStatusCode.OK Then Return CheckValidImage(img)
             Return Nothing
+        Catch ex As WebException
+            If errmsg IsNot Nothing Then
+                errmsg = ex.Message
+            End If
+            Return Nothing
         Catch ex As Exception
             Return Nothing
         End Try

diff --git a/Tween/Thumbnail.vb b/Tween/Thumbnail.vb
index 3f39edc..6f6c81c 100644 (file)
--- a/Tween/Thumbnail.vb
+++ b/Tween/Thumbnail.vb
@@ -73,9 +73,6 @@ Public Class Thumbnail
         Public imageCreator As ImageCreatorDelegate
     End Structure
 
-    ' TODO: 次の動作が未検証なので要検証
-    ' bctiny.com(ShortUrl.vbのバグ修正が必要)
-
     Private ThumbnailServices As ThumbnailService() = {
         New ThumbnailService With {.Name = "ImgUr", .urlCreator = AddressOf ImgUr_GetUrl, .imageCreator = AddressOf ImgUr_CreateImage}, _
         New ThumbnailService With {.Name = "DirectLink", .urlCreator = AddressOf DirectLink_GetUrl, .imageCreator = AddressOf DirectLink_CreateImage}, _