… | … | ||
---|---|---|---|
825 | if $VERBOSE; | 825 | if $VERBOSE; |
826 | 826 | ||
827 | open my $fh, ">:perlio", "$DATADIR/facedata~" | 827 | open my $fh, ">:perlio", "$DATADIR/facedata~" |
828 | or die "$DATADIR/facedata~: $!"; | 828 | or die "$DATADIR/facedata~: $!"; |
829 | 829 | ||
830 | print $fh freeze { | 830 | print $fh nfreeze { |
831 | version => 2, | 831 | version => 2, |
832 | faceinfo => \%FACEINFO, | 832 | faceinfo => \%FACEINFO, |
833 | animinfo => \%ANIMINFO, | 833 | animinfo => \%ANIMINFO, |
834 | resource => \%RESOURCE, | 834 | resource => \%RESOURCE, |
835 | }; | 835 | }; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |