author | root@pu.schlittermann.de |
Thu, 04 Nov 2010 23:09:44 +0100 | |
changeset 13 | 8ade8810add5 |
parent 12 | b98e281d5a09 |
child 14 | 526aad9d2f83 |
child 28 | 8239b2754411 |
update-serial | file | annotate | diff | comparison | revisions |
--- a/update-serial Thu Nov 04 22:26:39 2010 +0100 +++ b/update-serial Thu Nov 04 23:09:44 2010 +0100 @@ -82,7 +82,7 @@ my $now = time; open(my $in, "+<", $file) or do { - print "?? $!"; + print "??: $!" if $opt_verbose; next; }; @@ -111,6 +111,8 @@ open(my $out, ">$stamp_file"); close($out); + print "$file\n" if not $opt_verbose; + $changed++; } continue { print "\n" if $opt_verbose and defined $file;