Changeset 337 for branches/stable


Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/stable/cgi-bin/IPDB.pm

    r336 r337  
    588588##TEMP
    589589  # We've already deleted the block, now we have to stuff its IPs into the pool.
    590   $sth = $dbh->prepare("insert into poolips values ('209.91.185.0/24',?,'6750400','Sudbury','di','y','','','')");
    591   $sth->execute($cidr->addr);
     590  my $sth2 = $dbh->prepare("insert into poolips values ('209.91.185.0/24',?,'6750400','Sudbury','di','y','','','')");
     591  $sth2->execute($cidr->addr);
    592592  foreach my $ip ($cidr->hostenum) {
    593     $sth->execute("$ip");
     593    $sth2->execute("$ip");
    594594  }
    595595  $cidr--;
    596   $sth->execute($cidr->addr);
     596  $sth2->execute($cidr->addr);
    597597
    598598##TEMP
Note: See TracChangeset for help on using the changeset viewer.