diff options
| -rwxr-xr-x | localmarkdown2sms | 4 |
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); |