# HG changeset patch # User root@pu.schlittermann.de # Date 1288908584 -3600 # Node ID 8ade8810add59847f42b5b50a995725d0d55ed99 # Parent b98e281d5a0968bbe76958d9b9e6ab4ee0202650 more meaningful error message diff -r b98e281d5a09 -r 8ade8810add5 update-serial --- 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;