Changeset 787 for trunk/cgi-bin
- Timestamp:
- 10/08/15 17:41:56 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/main.cgi
r786 r787 1132 1132 1133 1133 if ($code eq 'FAIL') { 1134 syslog "err", "$authuser could not update block/IP '$ webvar{block}': '$msg'";1135 $page->param(err => "Could not update block/IP $ webvar{block}: $msg");1134 syslog "err", "$authuser could not update block/IP '$binfo->{block}' (id $webvar{block}): '$msg'"; 1135 $page->param(err => "Could not update block/IP $binfo->{block}: $msg"); 1136 1136 return; 1137 1137 } 1138 1138 1139 1139 # If we get here, the operation succeeded. 1140 syslog "notice", "$authuser updated $ webvar{block}";1140 syslog "notice", "$authuser updated $binfo->{block}"; 1141 1141 ##fixme: log details of the change? old way is in the .debug stream anyway. 1142 1142 ##fixme: need to wedge something in to allow "update:field" notifications 1143 1143 ## hmm. how to tell what changed? O_o 1144 mailNotify($ip_dbh, 's:swi', "SWIPed: $disp_alloctypes{$webvar{alloctype}} $ webvar{block}",1145 "$ webvar{block} had SWIP status changed to \"Yes\" by $authuser") if $webvar{swip} eq 'on';1144 mailNotify($ip_dbh, 's:swi', "SWIPed: $disp_alloctypes{$webvar{alloctype}} $binfo->{block}", 1145 "$binfo->{block} had SWIP status changed to \"Yes\" by $authuser") if $webvar{swip} eq 'on'; 1146 1146 1147 1147 ## node hack
Note:
See TracChangeset
for help on using the changeset viewer.