1 Fixes an error in nrgtool.
4 @@ -162,7 +162,7 @@ sub process_file {
6 seek $nrg, 0, SEEK_SET if ($iff_only);
7 seek $nrg, $offset, SEEK_SET unless ($iff_only);
8 - while (my $_ = read_chunk($nrg, $iff)) {
9 + while ($_ = read_chunk($nrg, $iff)) {
11 warn "ERROR while reading an IFF chunk; aborting\n";