r107:

[carnet-tools-cn.git] / cp-update

diff --git a/cp-update b/cp-update
index 00ad0d9..01bfe48 100755 (executable)
--- a/cp-update
+++ b/cp-update
@@ -35,7 +35,7 @@ sub DEBUG () { 0 };
 #
 my ($ProgramName, $UsageLong, $UsageShort, $VERSION);
 
-$VERSION = '2.0';
+$VERSION = '2.1';
 
 # Looks nicer without the slashes and dots
 ($ProgramName = $0) =~ s!.*/!!; # strip dir
@@ -492,6 +492,7 @@ sub actualize() {
     unlink($file_old)
       or warn "$ProgramName: Failed to remove file '$file_old' ($!)\n";
   }
+  DEBUG and print STDERR "actualize: LinesCount=$LinesCount\n";
 }
 
 # return content from standard input