Changeset 665 for trunk/cgi-bin

Timestamp:

12/30/14 16:22:29 (10 years ago)

Author:

Kris Deugau

Message:

/trunk

Patch up a few glitches in the "automatic" assignment process

File:

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

trunk/cgi-bin/main.cgi

@@ -388 +388 @@
   return if !validateInput();
 
+  # make sure this is defined
+  $webvar{fbassign} = 'n' if !$webvar{fbassign};
+
 # Several different cases here.
 # Static IP vs netblock
@@ -394 +397 @@
 
   if ($webvar{alloctype} =~ /^.i$/ && $webvar{fbassign} ne 'y') {
+    if (!$webvar{pop}) {
+      $page->param(err => "Please select a location/POP site to allocate from.");
+      return;
+    }
     my $plist = getPoolSelect($ip_dbh, $webvar{alloctype}, $webvar{pop});
     $page->param(staticip => 1);