Strip non-(danish-)chars from keyword in localmarkdown2sms.

1 files changed, 1 insertions, 1 deletions

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);