X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fbrowse%2Frate.cgi;h=584891aea02125da4d83eb24fc521710c1eabefd;hb=eb4ff7f73c5d4bdf74a3472448b5a195598ff4cd;hp=9bdbe2d0cd068b957b011f9ca49d3fbbe3a88c10;hpb=3ce7691203a7737406bf2d4442f7fd84b81f847e;p=freeside.git
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>