| author | Heiko Schlittermann (JUMPER) <hs@schlittermann.de> | 
| Tue, 06 Sep 2011 15:08:29 +0200 | |
| changeset 85 | 9afa91bee25b | 
| parent 81 | f8fc94c18ebd | 
| child 88 | 00a538dd7908 | 
| bin/imager.check | file | annotate | diff | comparison | revisions | 
--- a/bin/imager.check Tue Aug 23 11:18:20 2011 +0200 +++ b/bin/imager.check Tue Sep 06 15:08:29 2011 +0200 @@ -230,7 +230,7 @@ Imager::get_block($file => \my $buffer); if (md5_hex($buffer) ne basename($file, qw(.gz .x .gz.x))) { - say "wrong checksum for $file\n"; + say "wrong checksum for $file $k @$i\n"; @invalid{@$i} = (); next; }