OSDN Git Service

list_updatedイベントにとりあえず対応
authorkiri_feather <kiri_feather@users.sourceforge.jp>
Mon, 2 May 2011 11:30:58 +0000 (20:30 +0900)
committerKimura Youichi <kim.upsilon@bucyou.net>
Sat, 18 Feb 2012 14:19:27 +0000 (23:19 +0900)
Tween/MyCommon.vb
Tween/Twitter.vb

index 036ffa7..ed3e32a 100644 (file)
@@ -178,9 +178,10 @@ Public Module MyCommon
         UserUpdate = 128
         Deleted = 256
         ListCreated = 512
+        ListUpdated = 1024
 
         All = (None Or Favorite Or Unfavorite Or Follow Or ListMemberAdded Or ListMemberRemoved Or _
-               Block Or Unblock Or UserUpdate Or Deleted Or ListCreated)
+               Block Or Unblock Or UserUpdate Or Deleted Or ListCreated Or ListUpdated)
     End Enum
 
     Public Sub TraceOut(ByVal ex As Exception, ByVal Message As String)
index d21ed24..a9b8867 100644 (file)
@@ -2968,7 +2968,8 @@ Public Class Twitter
         New EventTypeTableElement("unblock", EVENTTYPE.Unblock), _
         New EventTypeTableElement("user_update", EVENTTYPE.UserUpdate), _
         New EventTypeTableElement("deleted", EVENTTYPE.Deleted), _
-        New EventTypeTableElement("list_created", EVENTTYPE.ListCreated)
+        New EventTypeTableElement("list_created", EVENTTYPE.ListCreated), _
+        New EventTypeTableElement("list_updated", EVENTTYPE.ListUpdated)
     }
 
     Public Function EventNameToEventType(ByVal EventName As String) As EVENTTYPE
@@ -3108,7 +3109,7 @@ Public Class Twitter
                         End If
                     End If
                 End If
-            Case "list_member_added", "list_member_removed"
+            Case "list_member_added", "list_member_removed", "list_updated"
                 evt.Target = eventData.TargetObject.FullName
             Case "block"
                 evt.Target = ""