Hardcode strip a-grave from keyword.

1 files changed, 4 insertions, 0 deletions

diff --git a/localmarkdown2sms b/localmarkdown2sms
index 86b0f6d..5df5964 100755
--- a/localmarkdown2sms
+++ b/localmarkdown2sms
@@ -86,6 +86,10 @@ if ($stripprefix) {
 $key = transliterate($key);
 # use only first chunk of word chars as keyword
 $key =~ s/^(\S+).*?$/$1/;
+# strip problematic chars from keyword
+# FIXME: strip as part of transliterate function instead
+# TODO: Maintain language-specific lists instead (á is specific to Hungary)
+$key =~ tr/à/a/;
 
 if ($debug) {
 	Log::Log4perl->easy_init($DEBUG);