Changeset 405
- Timestamp:
- 05/12/10 16:07:37 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/main.cgi
r402 r405 906 906 qq(">Add this netblock to RADIUS user table</a></div>) 907 907 : "</div>"); 908 } 908 # mailNotify('nocmgr@example.com',"ADDED: $disp_alloctypes{$webvar{alloctype}} allocation", 909 # "$disp_alloctypes{$webvar{alloctype}} $webvar{fullcidr} allocated to customer $webvar{custid}\n". 910 # "Description: $webvar{desc}\n\nAllocated by: $authuser\n"); 911 } 912 909 913 syslog "notice", "$authuser allocated '$webvar{fullcidr}' to '$webvar{custid}' as ". 910 914 "'$webvar{alloctype}' ($msg)"; … … 1118 1122 if ($data[2] =~ /.i/) { 1119 1123 $html =~ s/\$\$SWIP\$\$/N\/A/; 1120 } else {1124 5~} else { 1121 1125 my $tmp = (($data[10] eq 'n') ? '<input type=checkbox name=swip>' : 1122 1126 '<input type=checkbox name=swip checked=yes>'); … … 1222 1226 # If we get here, the operation succeeded. 1223 1227 syslog "notice", "$authuser updated $webvar{block}"; 1228 #mailNotify('nocmgr@example.com',"SWIPed: $disp_alloctypes{$webvar{alloctype}} $webvar{block}", 1229 # "$webvar{block} had SWIP status changed to \"Yes\" by $authuser"); 1224 1230 open (HTML, "../updated.html") 1225 1231 or croak "Could not open updated.html :$!"; … … 1401 1407 # "$disp_alloctypes{$webvar{alloctype}} $webvar{block} deallocated by $authuser\n". 1402 1408 # "CustID: $custid\nCity: $city\nDescription: $description\n"); 1409 # mailNotify('nocmgr@example.com',"REMOVED: $disp_alloctypes{$webvar{alloctype}} $webvar{block}", 1410 # "$disp_alloctypes{$webvar{alloctype}} $webvar{block} deallocated by $authuser\n". 1411 # "CustID: $custid\nCity: $city\nDescription: $description\n"); 1403 1412 } else { 1404 1413 if ($webvar{alloctype} =~ /^.i$/) {
Note:
See TracChangeset
for help on using the changeset viewer.