Author: joeyh
Date: 2005-09-01 20:13:16 +0000 (Thu, 01 Sep 2005)
New Revision: 1771
Modified:
bin/checklist
Log:
fix $id scoping
Modified: bin/checklist
==================================================================---
bin/checklist 2005-09-01 20:04:41 UTC (rev 1770)
+++ bin/checklist 2005-09-01 20:13:16 UTC (rev 1771)
@@ -97,9 +97,9 @@
$list="$list/list";
}
+ my $id;
open (IN, $list) || die "open $list: $!";
while (<IN>) {
- my $id;
print STDERR "line: $_" if $debug;
chomp;
if (/\s+TODO/) { # It''s a todo item. Add it to the count, and ignore
it