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

Timestamp:

11/26/04 14:30:49 (20 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Bugfix for assigning a block to someone in Burk's Falls
(or any other city with an apostrophe)

File:

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

branches/stable/cgi-bin/main.cgi

@@ -932 +932 @@
   $html =~ s|\$\$ALLOC_FROM\$\$|$alloc_from|g;
   $html =~ s|\$\$CIDR\$\$|$cidr|g;
+  $webvar{city} = desanitize($webvar{city});
   $html =~ s|\$\$CITY\$\$|$webvar{city}|g;
   $html =~ s|\$\$CUSTID\$\$|$webvar{custid}|g;
@@ -1157 +1158 @@
       printAndExit("Please enter a customer ID.");
     }
-    if ($webvar{custid} !~ /^(?:\d{10}|\d{7}|STAFF)(?:-\d\d?)?$/) {
+    if ($webvar{custid} !~ /^(?:\d{10}|\d{7}|STAFF|TEMP)(?:-\d\d?)?$/) {
       # Force uppercase for now...
       $webvar{custid} =~ tr/a-z/A-Z/;