r11663@llin: dpavlin | 2005-12-13 02:18:07 +0100
[BackupPC.git] / bin / BackupPC_incPartsUpdate
index 1ea28c0..2e3d576 100755 (executable)
@@ -141,7 +141,7 @@ sub tar_check($$$$) {
        if ($debug) {
                print STDERR " {{ CHECK: ${host}:${share}#${num} and $filename";
        } else {
-               print " check";
+               print " check $filename";
        }
 
        my @tar_parts;
@@ -162,7 +162,7 @@ sub tar_check($$$$) {
 
        my $backup_part;
 
-       print " reading";
+       print " reading" if ($opt{d});
 
        foreach my $tarfilename (@tar_parts) {