末尾カットの際に@IDと推測される文字列で終了している場合はさらにカットするように

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

diff --git a/Tween/Tween.vb b/Tween/Tween.vb
index 3a6a7bf..22286e9 100644 (file)
--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -1702,6 +1702,7 @@ Public Class TweenMain
             If mc.Success Then
                 'MessageBox.Show(My.Resources.PostLengthOverMessage3 + Environment.NewLine + Environment.NewLine + args.status.status, "Abort", MessageBoxButtons.OK)
                 'Exit Sub
+                'さらに@IDと推測される文字列をカットする
                 args.status.status = args.status.status.Substring(0, 140 - mc.Value.Length)
             End If
             If MessageBox.Show(args.status.status, "Post or Cancel?", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Cancel Then Exit Sub