X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fbrowse%2Frate.cgi;h=584891aea02125da4d83eb24fc521710c1eabefd;hp=9bdbe2d0cd068b957b011f9ca49d3fbbe3a88c10;hb=15777da47bab33e8f0021e6dd9aa6b434fa9be30;hpb=655b4043942c7d361224d283accb4c2a02ef7359
diff --git a/httemplate/browse/rate.cgi b/httemplate/browse/rate.cgi
index 9bdbe2d0c..584891aea 100644
--- a/httemplate/browse/rate.cgi
+++ b/httemplate/browse/rate.cgi
@@ -1,22 +1,3 @@
-%
-%
-%my $html_init =
-% 'Rate plans, regions and prefixes for VoIP and call billing.
'.
-% qq!Add a rate plan!.
-% qq! | Add a region!.
-% '
-% ';
-%
-%my $count_query = 'SELECT COUNT(*) FROM rate';
-%
-%my $link = [ $p.'edit/rate.cgi?', 'ratenum' ];
-%
-%
<% include( 'elements/browse.html',
'title' => 'Rate plans',
'menubar' => [ 'Main menu' => $p, ],
@@ -32,3 +13,25 @@
'links' => [ $link, $link ],
)
%>
+<%init>
+
+die "access denied"
+ unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
+
+my $html_init =
+'Rate plans, regions and prefixes for VoIP and call billing.
'.
+qq!Add a rate plan!.
+qq! | Add a region!.
+'
+ ';
+
+my $count_query = 'SELECT COUNT(*) FROM rate';
+
+my $link = [ $p.'edit/rate.cgi?', 'ratenum' ];
+
+%init>