svnno****@sourc*****
svnno****@sourc*****
2011年 9月 28日 (水) 01:32:32 JST
Revision: 1605
http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1605
Author: kiri_feather
Date: 2011-09-28 01:32:31 +0900 (Wed, 28 Sep 2011)
Log Message:
-----------
1080リリース
フォロワー情報更新を6時間毎へ
DM関連認証エラーを緩く変更
ブロックユーザーに自身が含まれる場合があったので対処
Modified Paths:
--------------
trunk/Tween/My Project/AssemblyInfo.vb
trunk/Tween/Resources/ChangeLog.txt
trunk/Tween/Tween.vb
trunk/Tween/Twitter.vb
-------------- next part --------------
Modified: trunk/Tween/My Project/AssemblyInfo.vb
===================================================================
--- trunk/Tween/My Project/AssemblyInfo.vb 2011-09-27 04:45:58 UTC (rev 1604)
+++ trunk/Tween/My Project/AssemblyInfo.vb 2011-09-27 16:32:31 UTC (rev 1605)
@@ -55,5 +55,5 @@
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("0.1.0.0")>
-<Assembly: AssemblyFileVersion("1.0.7.0")>
+<Assembly: AssemblyFileVersion("1.0.8.0")>
Modified: trunk/Tween/Resources/ChangeLog.txt
===================================================================
--- trunk/Tween/Resources/ChangeLog.txt 2011-09-27 04:45:58 UTC (rev 1604)
+++ trunk/Tween/Resources/ChangeLog.txt 2011-09-27 16:32:31 UTC (rev 1605)
@@ -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換算文字カウントが正しくなかったのを修正
Modified: trunk/Tween/Tween.vb
===================================================================
--- trunk/Tween/Tween.vb 2011-09-27 04:45:58 UTC (rev 1604)
+++ trunk/Tween/Tween.vb 2011-09-27 16:32:31 UTC (rev 1605)
@@ -1294,7 +1294,7 @@
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))
Modified: trunk/Tween/Twitter.vb
===================================================================
--- trunk/Tween/Twitter.vb 2011-09-27 04:45:58 UTC (rev 1604)
+++ trunk/Tween/Twitter.vb 2011-09-27 16:32:31 UTC (rev 1605)
@@ -574,7 +574,9 @@
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 @@
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 @@
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 @@
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