--- AnyEvent/util/gen_uts46data 2009/12/15 05:49:13 1.1 +++ AnyEvent/util/gen_uts46data 2009/12/15 05:58:11 1.2 @@ -38,7 +38,7 @@ # nop } when (/mapped|deviation|ignored/) { - $map .= "\x01" if $type eq "deviation"; + $map = "\x01$map" if $type eq "deviation"; $imap .= "\x00" . chr . $map for $r1 .. $r2 || $r1;