提交: 822690498abd4e98eebed6ebfe895deee1f4ff47 - open_tween (git)

dev

Commit MetaInfo

• 修订版: 822690498abd4e98eebed6ebfe895deee1f4ff47 (tree)
• 时间: 2012-02-18 23:20:00
• 作者: kiri_feather <kiri_feather@user...>
• Commiter: Kimura Youichi

Log Message

1080リリース
フォロワー情報更新を6時間毎へ
DM関連認証エラーを緩く変更
ブロックユーザーに自身が含まれる場合があったので対処

更改概述

• modified: Tween/My Project/AssemblyInfo.vb
• modified: Tween/Resources/ChangeLog.txt
• modified: Tween/Tween.vb
• modified: Tween/Twitter.vb

差异

--- a/Tween/My Project/AssemblyInfo.vb	
+++ b/Tween/My Project/AssemblyInfo.vb	
@@ -55,5 +55,5 @@ Imports System.Runtime.InteropServices
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
 <Assembly: AssemblyVersion("0.1.0.0")> 
-<Assembly: AssemblyFileVersion("1.0.7.0")> 
+<Assembly: AssemblyFileVersion("1.0.8.0")> 
 

--- a/Tween/Resources/ChangeLog.txt
+++ b/Tween/Resources/ChangeLog.txt
@@ -1,7 +1,21 @@
 更新履歴
 
-==== Ver 1.0.8.0(2011/**/**)
+==== Ver 1.0.8.0(2011/9/28)
+ * NEW: タブのドラッグ＆ドロップを禁止するオプション追加
+ * CHG: URLコピーで、可能なら展開したURLをコピーするよう変更
+ * CHG: フォロワー更新確認を1時間毎→6時間毎に変更
+ * CHG: ブロックしたユーザーに自身が含まれていたら除外するよう変更（Twitterのバグか）
  * FIX: アイコンURLの拡張子がない場合に右クリックからアイコンを表示できなかったバグを修正
+ * FIX: Bing翻訳で#を含む発言が翻訳できないバグ修正
+ * FIX: 起動時にDMが取得できない場合があったので対処
+ * FIX: 画面サイズを小さくすると例外が発生するバグ修正
+ * FIX: UserTimeline取得時にタブ削除されると例外発生するバグ修正
+ * FIX: 画像投稿で例外発生するバグ修正
+ * FIX: 発言振り分けで例外発生するバグ修正
+ * FIX: 一部動画・画像共有サービスのサムネイルが表示できないバグ修正
+ * FIX: Twitterの設定が取得できていないとユーザー名が正しく判定できないバグ修正
+ * FIX: 設定画面でキャンセルした際、設定画面開いた時のアクティブユーザーに戻ってなかったバグ修正
+ * FIX: バージョンアップ時の画面を開いていてもメイン画面が触れるためメッセージ表示時に例外発生するバグ修正
 ==== Ver 1.0.7.0(2011/9/11)
  * FIX: 非公式RT・QTで元発言中URLが{$title}となってしまうバグ修正
  * FIX: 一部URLのt.co換算文字カウントが正しくなかったのを修正

--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -1294,7 +1294,7 @@ Public Class TweenMain
             If Me._isActiveUserstream Then RefreshTimeline(True)
             ResetTimers.UserStream = False
         End If
-        If refreshFollowers > 3600 Then
+        If refreshFollowers > 21600 Then
             Interlocked.Exchange(refreshFollowers, 0)
             doGetFollowersMenu()
             If InvokeRequired AndAlso Not IsDisposed Then Me.Invoke(New MethodInvoker(AddressOf Me.TrimPostChain))

--- a/Tween/Twitter.vb
+++ b/Tween/Twitter.vb
@@ -574,7 +574,9 @@ Public Class Twitter
         If _endingFlag Then Return ""
 
         If Twitter.AccountState <> ACCOUNT_STATE.Valid Then Return ""
-        If Not TwitterApiInfo.IsDirectMessagePermission Then Return "Auth Err:try to re-authorization."
+        If TwitterApiInfo.AccessLevel <> ApiAccessLevel.None Then
+            If Not TwitterApiInfo.IsDirectMessagePermission Then Return "Auth Err:try to re-authorization."
+        End If
 
         postStr = postStr.Trim()
 
@@ -750,7 +752,9 @@ Public Class Twitter
         If _endingFlag Then Return ""
 
         If Twitter.AccountState <> ACCOUNT_STATE.Valid Then Return ""
-        If Not TwitterApiInfo.IsDirectMessagePermission Then Return "Auth Err:try to re-authorization."
+        If TwitterApiInfo.AccessLevel <> ApiAccessLevel.None Then
+            If Not TwitterApiInfo.IsDirectMessagePermission Then Return "Auth Err:try to re-authorization."
+        End If
 
         Dim res As HttpStatusCode
 
@@ -2329,7 +2333,7 @@ Public Class Twitter
         If _endingFlag Then Return ""
 
         If Twitter.AccountState <> ACCOUNT_STATE.Valid Then Return ""
-        If Not TwitterApiInfo.AccessLevel <> ApiAccessLevel.None Then
+        If TwitterApiInfo.AccessLevel <> ApiAccessLevel.None Then
             If Not TwitterApiInfo.IsDirectMessagePermission Then Return "Auth Err:try to re-authorization."
         End If
 
@@ -3311,7 +3315,8 @@ Public Class Twitter
         End Select
 
         Try
-            Dim Ids = CreateDataFromJson(Of Long())(content)
+            Dim Ids = CreateDataFromJson(Of List(Of Long))(content)
+            If Ids.Contains(Me.UserId) Then Ids.Remove(Me.UserId)
             TabInformations.GetInstance.BlockIds.AddRange(Ids)
             Return ("")
         Catch ex As SerializationException