| author | Heiko Schlittermann (JUMPER) <hs@schlittermann.de> |
| Fri, 09 Sep 2011 23:30:58 +0200 | |
| changeset 88 | 00a538dd7908 |
| parent 87 | ae622a73b077 (current diff) |
| parent 85 | 9afa91bee25b (diff) |
| child 89 | 3c3305dcb038 |
| bin/imager.list | file | annotate | diff | comparison | revisions |
--- a/bin/imager.check Fri Sep 09 23:29:47 2011 +0200 +++ b/bin/imager.check Fri Sep 09 23:30:58 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; }