Changeset 42

Timestamp:

11/01/04 10:49:35 (20 years ago)

Author:

Kris Deugau

Message:

/trunk

Merge bugfix from /branches/stable r41

File:

• trunk/cgi-bin/main.cgi (modified) (2 diffs)

trunk/cgi-bin/main.cgi

@@ -973 +973 @@
     # We'll just have to put up with the oddities caused by SQL (un)sort order
     $sth = $ip_dbh->prepare("select * from poolips where pool='$webvar{alloc_from}'".
-        " and available='y' order by IP");
+        " and available='y' order by ip");
     $sth->execute;
 
@@ -979 +979 @@
     my $cidr = $data[1];
 
-    $sth = $ip_dbh->prepare("update poolips set custid='$webvar{custid}',available='n'".
+    $sth = $ip_dbh->prepare("update poolips set custid='$webvar{custid}',city='$webvar{city}'".
+        " available='n',description='$webvar{desc}'".
         " where ip='$cidr'");
     $sth->execute;