From 622f62b43e14cbe8e417efc04c1d9210ee8cd893 Mon Sep 17 00:00:00 2001 From: Jonas Smedegaard Date: Sat, 10 Jul 2010 19:43:37 +0200 Subject: Strip non-(danish-)chars from keyword in localmarkdown2sms. --- localmarkdown2sms | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'localmarkdown2sms') diff --git a/localmarkdown2sms b/localmarkdown2sms index 662a20c..fd0a453 100755 --- a/localmarkdown2sms +++ b/localmarkdown2sms @@ -82,7 +82,7 @@ if ($stripprefix) { } # strip non-word chars from keyword (and use only first chunk of word chars) -$key =~ s/.*?(\w+).*?/$1/; +$key =~ s/.*?([a-zæøåÆØÅ!@\/][a-zæøåÆØÅ0-9-]+).*?/$1/; if ($debug) { Log::Log4perl->easy_init($DEBUG); -- cgit v1.2.3