fix the detectios of hashtag at border.

gugod · Apr 4, 2013 · c203391 · c203391
1 parent 6e0c411
commit c203391
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/org-expense-report b/org-expense-report
@@ -55,7 +55,7 @@ do {
                 lc($currency);
                 $currency ||= "NTD";
 
-                if ($description =~ /\s\#(\w+)\b/) {
+                if ($description =~ /(?:\s|\A|\b)\#([a-zA-Z]+)(\b|$)/) {
                     $category = $1;
                 }
                 else {