diff options
-rwxr-xr-x | localkannel-dispatch | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/localkannel-dispatch b/localkannel-dispatch index 0a04b73..a142762 100755 --- a/localkannel-dispatch +++ b/localkannel-dispatch @@ -27,7 +27,7 @@ lctransliterate() { echo "$1" | perl -n \ -e 'use Text::Unidecode;' \ -e 'use Encode 2.12 qw(encode decode _utf8_off);' \ - -e 'print lc(encode("UTF-8", decode("GSM0338", encode("GSM0338", decode("UTF-8, $_),' \ + -e 'print lc(encode("UTF-8", decode("GSM0338", encode("GSM0338", decode("UTF-8", $_),' \ -e 'sub {$a=unidecode(chr $_[0]); _utf8_off($a); $a;}' \ -e '))));' |