Changeset 875 for trunk/cgi-bin
- Timestamp:
- 05/13/16 13:36:59 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/IPDB.pm
r874 r875 267 267 my $inssth = $dbh->prepare(q{ 268 268 INSERT INTO poolips ( 269 ip,type,parent_id, available,269 ip,type,parent_id,master_id,available, 270 270 city,description,notes,circuitid,createstamp,modifystamp,privdata,custid,vrf,vlan,rdns 271 271 ) 272 VALUES (?,?,?, 'n',?,?,?,?,?,?,?,?,?,?,?)272 VALUES (?,?,?,?,'n',?,?,?,?,?,?,?,?,?,?,?) 273 273 }); 274 274 my $updsth = $dbh->prepare("UPDATE poolips SET parent_id = ?, type = ? WHERE parent_id = ?"); … … 296 296 next if $newip->addr eq $gw->addr; 297 297 } 298 $inssth->execute($newip, $newtype, $poolparent, @oldalloc) if !$poolcounter{"$newip"};298 $inssth->execute($newip, $newtype, $poolparent, $master, @oldalloc) if !$poolcounter{"$newip"}; 299 299 $poolcounter{"$newip"}++; 300 300 }
Note:
See TracChangeset
for help on using the changeset viewer.