From 11b07ea523314b123b4e503ce3813443a018c8d3 Mon Sep 17 00:00:00 2001
From: Mark Andrews <marka@isc.org>
Date: Tue, 30 Jan 2007 06:29:21 +0000
Subject: [PATCH] use local variables in loops

---
 util/update_branches | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/util/update_branches b/util/update_branches
index ffc18433d9..9d20c68577 100644
--- a/util/update_branches
+++ b/util/update_branches
@@ -14,7 +14,7 @@
 # OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
 # PERFORMANCE OF THIS SOFTWARE.
 
-# $Id: update_branches,v 1.19 2007/01/30 06:00:00 marka Exp $
+# $Id: update_branches,v 1.20 2007/01/30 06:29:21 marka Exp $
 
 #
 #  Track which branches are still open or not in the bind9 cvs repository.
@@ -52,6 +52,9 @@ $module = "bind9";
 #
 open(BRANCHES, "<doc/private/branches") || die "can't open util/branches: $!";
 while (<BRANCHES>) {
+	my $branch;
+	my $status;
+	my $who;
 	chomp;
 	next if (/^-/);
 	next if (/^Branch/);
@@ -85,6 +88,13 @@ close (BRANCHES);
 # T 1999-03-15 21:15 +0000 vixie bind [ietf44:A]
 open(HISTORY, "cvs history -T -a 2> /dev/null |") || die("can't get history");
 while (<HISTORY>) {
+	my $tag;
+	my $date;
+	my $time;
+	my $tz;
+	my $who;
+	my $mod;
+	my $branch;
         chomp;
         s/[][]//g;
         s/:[^ \t]+$//;
@@ -95,7 +105,7 @@ while (<HISTORY>) {
 	next if (exists($history{$branch}));
 	$history{$branch} = $who;
 	$dates{$branch} = "$date $time $tz";
-        print "$_\n";
+        # print "$_\n";
 }
 close (HISTORY);