From 78e97c32f0d189780ba3f4b59308cb85e7cfb6c1 Mon Sep 17 00:00:00 2001
From: f_swallow <f_swallow@users.sourceforge.jp>
Date: Thu, 10 Mar 2011 10:54:09 +0000
Subject: [PATCH] =?utf8?q?=E3=82=B3=E3=83=BC=E3=83=89=E3=81=8C=E4=B8=8D?=
 =?utf8?q?=E8=B6=B3=E3=81=97=E3=81=A6=E3=81=9F=E5=88=86=E3=82=92=E8=BF=BD?=
 =?utf8?q?=E5=8A=A0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@1488 e39ad16e-3079-482e-bb30-4b4d378143b6
---
 Tween/Tween.vb | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/Tween/Tween.vb b/Tween/Tween.vb
index dcbe32dd..1b9498c3 100644
--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -780,6 +780,8 @@ Public Class TweenMain
         SettingDialog.UserstreamStartup = _cfgCommon.UserstreamStartup
         SettingDialog.UserstreamPeriodInt = _cfgCommon.UserstreamPeriod
         SettingDialog.OpenUserTimeline = _cfgCommon.OpenUserTimeline
+        SettingDialog.ListDoubleClickAction = _cfgCommon.ListDoubleClickAction
+        SettingDialog.UserAppointUrl = _cfgCommon.UserAppointUrl
 
         'ハッシュタグ関連
         HashSupl = New AtIdSupplement(_cfgCommon.HashTags, "#")
@@ -2537,7 +2539,26 @@ Public Class TweenMain
     End Sub
 
     Private Sub MyList_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs)
-        MakeReplyOrDirectStatus()
+        Select Case SettingDialog.ListDoubleClickAction
+            Case 0
+                MakeReplyOrDirectStatus()
+            Case 1
+                FavoriteChange(True)
+            Case 2
+                If _curPost IsNot Nothing Then
+                    ShowUserStatus(_curPost.ScreenName, False)
+                End If
+            Case 3
+                ShowUserTimeline()
+            Case 4
+                ShowRelatedStatusesMenuItem_Click(Nothing, Nothing)
+            Case 5
+                MoveToHomeToolStripMenuItem_Click(Nothing, Nothing)
+            Case 6
+                StatusOpenMenuItem_Click(Nothing, Nothing)
+            Case 7
+                '動作なし
+        End Select
     End Sub
 
     Private Sub FavAddToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FavAddToolStripMenuItem.Click, FavOpMenuItem.Click
@@ -6072,6 +6093,8 @@ RETRY:
             _cfgCommon.OpenUserTimeline = SettingDialog.OpenUserTimeline
             _cfgCommon.ListCountApi = SettingDialog.ListCountApi
             _cfgCommon.UseImageService = ImageServiceCombo.SelectedIndex
+            _cfgCommon.ListDoubleClickAction = SettingDialog.ListDoubleClickAction
+            _cfgCommon.UserAppointUrl = SettingDialog.UserAppointUrl
 
             _cfgCommon.Save()
         End SyncLock
-- 
2.11.0