svnno****@sourc*****
svnno****@sourc*****
2010年 11月 1日 (月) 13:10:04 JST
Revision: 1015
http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1015
Author: f_swallow
Date: 2010-11-01 13:10:04 +0900 (Mon, 01 Nov 2010)
Log Message:
-----------
Sourceがweb,Keitai Mailの場合はhttp://twitter.com/を開くようにした
Modified Paths:
--------------
trunk/Tween/My Project/Resources.Designer.vb
trunk/Tween/My Project/Resources.resx
trunk/Tween/Twitter.vb
-------------- next part --------------
Modified: trunk/Tween/My Project/Resources.Designer.vb
===================================================================
--- trunk/Tween/My Project/Resources.Designer.vb 2010-11-01 03:53:35 UTC (rev 1014)
+++ trunk/Tween/My Project/Resources.Designer.vb 2010-11-01 04:10:04 UTC (rev 1015)
@@ -532,7 +532,7 @@
'''<summary>
''' 更新履歴
'''
- '''==== Ver 0.9.6.1(2010/10/**)
+ '''==== Ver 0.9.6.1(2010/10/22)
''' * URL直後のハッシュタグがリンク化されないバグを修正
''' * PublicSearchの取得数を変更可能にした
''' * Ctrl+J/K,SHIFT+J/Kが効かなくなっていたバグを修正
@@ -547,7 +547,7 @@
''' * 取得時の自ポスト既読化をDMにも適用するようにした
''' * Favorites取得数を設定できるようにした。０で標準取得数に合わせる
''' * リストビューの描画を若干高速化した
- '''==== Ver 0 [残りの文字列は切り詰められました]"; に類似しているローカライズされた文字列を検索します。
+ ''' * BASIC認証 [残りの文字列は切り詰められました]"; に類似しているローカライズされた文字列を検索します。
'''</summary>
Friend ReadOnly Property ChangeLog() As String
Get
@@ -1266,6 +1266,15 @@
End Property
'''<summary>
+ ''' <a href="http://twitter.com/" rel="nofollow">Keitai Mail</a> に類似しているローカライズされた文字列を検索します。
+ '''</summary>
+ Friend ReadOnly Property KeitaiMailSourceString() As String
+ Get
+ Return ResourceManager.GetString("KeitaiMailSourceString", resourceCulture)
+ End Get
+ End Property
+
+ '''<summary>
''' このリストを削除してもよろしいですか？ に類似しているローカライズされた文字列を検索します。
'''</summary>
Friend ReadOnly Property ListManageDeleteLists1() As String
@@ -2706,6 +2715,15 @@
End Property
'''<summary>
+ ''' <a href="http://twitter.com/" rel="nofollow">web</a> に類似しているローカライズされた文字列を検索します。
+ '''</summary>
+ Friend ReadOnly Property WebSourceString() As String
+ Get
+ Return ResourceManager.GetString("WebSourceString", resourceCulture)
+ End Get
+ End Property
+
+ '''<summary>
''' はい に類似しているローカライズされた文字列を検索します。
'''</summary>
Friend ReadOnly Property Yes() As String
Modified: trunk/Tween/My Project/Resources.resx
===================================================================
--- trunk/Tween/My Project/Resources.resx 2010-11-01 03:53:35 UTC (rev 1014)
+++ trunk/Tween/My Project/Resources.resx 2010-11-01 04:10:04 UTC (rev 1015)
@@ -1015,4 +1015,10 @@
<data name="TextSearchCountApi_Validating1" xml:space="preserve">
<value>取得発言数は20～100件を指定してください。</value>
</data>
+ <data name="KeitaiMailSourceString" xml:space="preserve">
+ <value><a href="http://twitter.com/" rel="nofollow">Keitai Mail</a></value>
+ </data>
+ <data name="WebSourceString" xml:space="preserve">
+ <value><a href="http://twitter.com/" rel="nofollow">web</a></value>
+ </data>
</root>
\ No newline at end of file
Modified: trunk/Tween/Twitter.vb
===================================================================
--- trunk/Tween/Twitter.vb 2010-11-01 03:53:35 UTC (rev 1014)
+++ trunk/Tween/Twitter.vb 2010-11-01 04:10:04 UTC (rev 1015)
@@ -621,7 +621,13 @@
post.Source = HttpUtility.HtmlDecode(mS.Result("${source}"))
End If
Else
- post.SourceHtml = String.Copy(post.Source)
+ If post.Source = "web" Then
+ post.SourceHtml = My.Resources.WebSourceString
+ ElseIf post.Source = "Keitai Mail" Then
+ post.SourceHtml = My.Resources.KeitaiMailSourceString
+ Else
+ post.SourceHtml = String.Copy(post.Source)
+ End If
End If
post.IsRead = read
@@ -1549,7 +1555,13 @@
post.Source = HttpUtility.HtmlDecode(mS.Result("${source}"))
End If
Else
- post.SourceHtml = String.Copy(post.Source)
+ If post.Source = "web" Then
+ post.SourceHtml = My.Resources.WebSourceString
+ ElseIf post.Source = "Keitai Mail" Then
+ post.SourceHtml = My.Resources.KeitaiMailSourceString
+ Else
+ post.SourceHtml = String.Copy(post.Source)
+ End If
End If
post.IsRead = read
@@ -1699,7 +1711,13 @@
post.Source = HttpUtility.HtmlDecode(mS.Result("${source}"))
End If
Else
- post.SourceHtml = String.Copy(post.Source)
+ If post.Source = "web" Then
+ post.SourceHtml = My.Resources.WebSourceString
+ ElseIf post.Source = "Keitai Mail" Then
+ post.SourceHtml = My.Resources.KeitaiMailSourceString
+ Else
+ post.SourceHtml = String.Copy(post.Source)
+ End If
End If
post.IsRead = read
@@ -1996,7 +2014,13 @@
post.Source = HttpUtility.HtmlDecode(mS.Result("${source}"))
End If
Else
- post.SourceHtml = String.Copy(post.Source)
+ If post.Source = "web" Then
+ post.SourceHtml = My.Resources.WebSourceString
+ ElseIf post.Source = "Keitai Mail" Then
+ post.SourceHtml = My.Resources.KeitaiMailSourceString
+ Else
+ post.SourceHtml = String.Copy(post.Source)
+ End If
End If
post.IsRead = read