diff options
| author | Jonas Smedegaard <dr@jones.dk> | 2010-09-25 22:16:55 +0200 |
|---|---|---|
| committer | Jonas Smedegaard <dr@jones.dk> | 2010-09-25 22:16:55 +0200 |
| commit | 4d110496244a0bab53732c5cf2b7560c5efd552d (patch) | |
| tree | 2b857013d3832f58bb1103b1ee2c0d3ff54165d3 /localkannel-dispatch | |
| parent | 485238ef0910133cb922e66b4dfa92d349d7c7ac (diff) | |
Fix typo in lctransliterate().
Diffstat (limited to 'localkannel-dispatch')
| -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 '))));' |