Changeset 164 for branches/stable/cgi-bin/main.cgi

Timestamp:

02/10/05 13:17:59 (21 years ago)

Author:

Kris Deugau

Message:

/branches/stable

More bugs on pool allocations - this time the the statements to
dig up IPs that match the criteria (pool type and pool "location").

File:

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

branches/stable/cgi-bin/main.cgi

@@ -800 +800 @@
     if ($base =~ /^[ds]$/) {
       $sql = "select * from poolips where available='y' and".
-        " ptype='$base' and (city='Sudbury' or city='North Bay')";
+        " type='$webvar{alloctype}' and (city='Sudbury' or city='North Bay')";
     } else {
       $sql = "select * from poolips where available='y' and".
-        " ptype='$base' and city='$webvar{pop}'";
+        " type='$webvar{alloctype}' and city='$webvar{pop}'";
     }