Changeset 337 for branches

Timestamp:

04/19/06 18:00:47 (19 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Fix lurking bug-in-waiting where I've reused a DBI statement
handle where I probably shouldn't have.

File:

• branches/stable/cgi-bin/IPDB.pm (modified) (1 diff)

branches/stable/cgi-bin/IPDB.pm

@@ -588 +588 @@
 ##TEMP
   # We've already deleted the block, now we have to stuff its IPs into the pool.
-  $sth = $dbh->prepare("insert into poolips values ('209.91.185.0/24',?,'6750400','Sudbury','di','y','','','')");
-  $sth->execute($cidr->addr);
+  my $sth2 = $dbh->prepare("insert into poolips values ('209.91.185.0/24',?,'6750400','Sudbury','di','y','','','')");
+  $sth2->execute($cidr->addr);
   foreach my $ip ($cidr->hostenum) {
-    $sth->execute("$ip");
+    $sth2->execute("$ip");
   }
   $cidr--;
-  $sth->execute($cidr->addr);
+  $sth2->execute($cidr->addr);
 
 ##TEMP