更新履歴
+==== Ver 0.7.9.0(Unreleased)
+ * APIモードでのハッシュタグ誤認対応
==== Ver 0.7.8.0(2009/11/18)
* Webモードで、公式ReTweetが有効になっている場合に、RT発言をFav発言と誤認する問題に対応
==== Ver 0.7.7.0(2009/11/15)
retStr = rg.Replace(retStr, "$1@<a href=""/$2"">$2</a>")
'ハッシュタグを抽出し、リンクに置換
- Dim rgh As New Regex("(^|[ .!,-:;<>?])#([^] !""#$%&'()*+,.:;<=>?@\-[\^`{|}~\r\n]+)")
+ Dim rgh As New Regex("(^|[ .!,\-:;<>?])#([^] !""#$%&'()*+,.:;<=>?@\-[\^`{|}~\r\n]+)")
Dim mh As Match = rgh.Match(retStr)
If mh.Success AndAlso Not IsNumeric(mh.Result("$2")) Then
retStr = rgh.Replace(retStr, "$1<a href=""" + _protocol + "twitter.com/search?q=%23$2"">#$2</a>")