From 75d2f37d562a347773321b3025f63f9d4c88240c Mon Sep 17 00:00:00 2001 From: ehouse Date: Sun, 14 Dec 2003 19:52:21 +0000 Subject: [PATCH] fix for two-byte non-7-bit ascii chars --- xwords4/dawg/xloc.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/xwords4/dawg/xloc.pm b/xwords4/dawg/xloc.pm index 729af26e4..a2eecefaf 100644 --- a/xwords4/dawg/xloc.pm +++ b/xwords4/dawg/xloc.pm @@ -115,7 +115,7 @@ sub WriteMapFile($$$) { } elsif ( $str =~ /\"(.+)\"/ ) { print $fhr pack($packStr, $specialCount++ ); } elsif ( $str =~ /(\d+)/ ) { - print $fhr pack( $packStr, chr($1) ); + print $fhr pack( $packStr, $1 ); } else { die "WriteMapFile: unrecognized face format $str"; }