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

Timestamp:

01/07/05 11:43:08 (21 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Added email notification for customer netblock ('cn') allocations
per user request

File:

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

branches/stable/cgi-bin/main.cgi

@@ -1178 +1178 @@
     print qq(<div class="center"><div class="heading">The block $webvar{fullcidr} was sucessfully added as type '$webvar{alloctype}' ($disp_alloctypes{$webvar{alloctype}})</div></div>);
 
+    if ($webvar{alloctype} eq 'cn') {
+      # Notify tech@example.com
+      mailNotify('tech@example.com',"$disp_alloctypes{$webvar{alloctype}} allocation",
+        "$disp_alloctypes{$webvar{alloctype}} $cidr allocated to customer $webvar{custid}\n".
+        "Description: $webvar{desc}\n\nAllocated by: $authuser\n");
+    }
+
   } # end static-IP vs netblock allocation