Merge branch '20150325-cust_main-CurrentUser' of https://github.com/fozzmoo/Freeside...
[freeside.git] / httemplate / misc / delete-rate_detail.html
1 % if ( $error ) {
2 %   errorpage($error);
3 % } else {
4 <% header('Rate deleted') %>
5     <SCRIPT TYPE="text/javascript">
6       window.top.location.reload();
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>