httemplate/misc/delete-rate_detail.html

   1 % if ( $error ) {
   2 %   errorpage($error);
   3 % } else {
   4 <& /elements/header-popup.html, 'Rate deleted' &>
   5     <SCRIPT TYPE="text/javascript">
   6       topreload();
   7     </SCRIPT>
   8     </BODY></HTML>
   9 % }
  10 <%init>
  11
  12 die "access denied"
  13   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
  14
  15 my ($query) = $cgi->keywords;
  16 $query =~ /^(\d+)$/ or die "Illegal ratedetailnum";
  17 my $rate_detail = FS::rate_detail->by_key($1);
  18 my $error = $rate_detail->delete;
  19
  20 </%init>