0870/0880リリース。WebのHTML変更対応。非公式RT/QT時に半角スペースの変換文字コード問題対応。ふぁぼったーのURL変更対応

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@105 e39ad16e-3079-482e-bb30-4b4d378143b6

diff --git a/Tween/My Project/AssemblyInfo.vb b/Tween/My Project/AssemblyInfo.vb
index e537522..1947aa4 100644 (file)
--- 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("0.8.6.0")> 
+<Assembly: AssemblyFileVersion("0.8.8.0")> 
 

diff --git a/Tween/Resources/ChangeLog.txt b/Tween/Resources/ChangeLog.txt
index 64742d0..09b6e0a 100644 (file)
--- a/Tween/Resources/ChangeLog.txt
+++ b/Tween/Resources/ChangeLog.txt
@@ -1,5 +1,10 @@
 更新履歴
 
+==== Ver 0.8.8.0(2010/02/23)
+ * ふぁぼったーのURLを変更（favotter.matope.com→favotter.netに変更）
+==== Ver 0.8.7.0(2010/02/23)
+ * 非公式RT/QT時に、半角スペース変換時の文字コードが以前と異なっており、一部のクライアントで文字化けしていた問題を修正
+ * WebのHTML仕様変更対応
 ==== Ver 0.8.6.0(2010/02/16)
  * 検索タブでhtmlのエスケープが不十分だった問題を修正
  * ハッシュタグ管理画面で、リストが空の時に「新規」→「キャンセル」で例外が発生するバグ修正

diff --git a/Tween/Tween.vb b/Tween/Tween.vb
index 2e55131..b21384f 100644 (file)
--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -4009,7 +4009,7 @@ RETRY:
     Private Sub FavorareMenuItem_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles FavorareMenuItem.Click, OpenFavotterOpMenuItem.Click
         If _curList.SelectedIndices.Count > 0 Then
             Dim post As PostClass = _statuses.Item(_curTab.Text, _curList.SelectedIndices(0))
-            OpenUriAsync("http://favotter.matope.com/user.php?user=" + post.Name)
+            OpenUriAsync("http://favotter.net/user.php?user=" + post.Name)
         End If
     End Sub
 
@@ -7136,6 +7136,7 @@ RETRY:
 
         _reply_to_id = 0
         _reply_to_name = ""
+        status = status.Replace(" ", " ")
 
         Return status
     End Function

diff --git a/Tween/Twitter.vb b/Tween/Twitter.vb
index 790e8f9..43b7f76 100644 (file)
--- a/Tween/Twitter.vb
+++ b/Tween/Twitter.vb
@@ -329,7 +329,7 @@ Public Module Twitter
             End If
 
             ' tr 要素の class 属性を消去
-            retMsg = Regex.Replace(retMsg, "(?<tagStart><li)(?<cls>\s+class=""[^""]+"")", "${tagStart}")
+            retMsg = Regex.Replace(retMsg, "(?<tagStart><li)(?<cls>\s+class=""[^""]+""\s+)", "${tagStart} ")
             'Do
             '    Try
             '        Dim idx As Integer = retMsg.IndexOf(_removeClass, StringComparison.Ordinal)
@@ -832,7 +832,7 @@ Public Module Twitter
             End If
 
             ' tr 要素の class 属性を消去
-            retMsg = Regex.Replace(retMsg, "(?<tagStart><li)(?<cls>\s+class=""[^""]+"")", "${tagStart}")
+            retMsg = Regex.Replace(retMsg, "(?<tagStart><li)(?<cls>\s+class=""[^""]+""\s+)", "${tagStart} ")
             'Do
             '    Try
             '        Dim idx As Integer = retMsg.IndexOf(_removeClass, StringComparison.Ordinal)
@@ -1092,7 +1092,7 @@ Public Module Twitter
             End If
 
             ' tr 要素の class 属性を消去
-            retMsg = Regex.Replace(retMsg, "(?<tagStart><li)(?<cls>\s+class=""[^""]+"")", "${tagStart}")
+            retMsg = Regex.Replace(retMsg, "(?<tagStart><li)(?<cls>\s+class=""[^""]+""\s+)", "${tagStart} ")
             'Do
             '    Try
             '        Dim idx As Integer = retMsg.IndexOf(_removeClass, StringComparison.Ordinal)