checker: nicer output
authorHeiko Schlittermann (JUMPER) <hs@schlittermann.de>
Fri, 29 Jul 2011 11:09:36 +0200
changeset 29 4a1820d504c4
parent 28 a305827c8827
child 32 02ef2d1b190a
checker: nicer output
bin/imager.check
--- a/bin/imager.check	Fri Jul 29 11:06:27 2011 +0200
+++ b/bin/imager.check	Fri Jul 29 11:09:36 2011 +0200
@@ -50,6 +50,7 @@
     # load the index files, remember the latest
     # timestamp we see
     #tie %idx, "DB_File" => $tmp->filename;
+    verbose("# reading index files");
     my %block = get_block_list($dir);
 
     verbose("# indexed: "
@@ -96,7 +97,7 @@
 
     my ($total, $done);
     verbose("# pass 1 - checking for unused blocks");
-    verbose("# pass 1 - estimating file count");
+    verbose("#          estimating file count");
 
     # calculate the number of files we expect
     find(
@@ -108,6 +109,7 @@
         },
         "$dir/data"
     );
+    verbose("#          got $total blocks/files");
 
     # progress
     local $SIG{ALRM} = sub {