X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fbrowse%2Fpkg_class.html;h=4f02ca22df4b78524abaf02c5010862e7fa90dd1;hb=3a17b276638200475d54201fa62566b7440e819a;hp=3ec5e559bbf3596b67678a57003210c0d420f85a;hpb=3ce7691203a7737406bf2d4442f7fd84b81f847e;p=freeside.git diff --git a/httemplate/browse/pkg_class.html b/httemplate/browse/pkg_class.html index 3ec5e559b..4f02ca22d 100644 --- a/httemplate/browse/pkg_class.html +++ b/httemplate/browse/pkg_class.html @@ -1,20 +1,9 @@ -% -% -%my $html_init = -% 'Package classes define groups of packages, for reporting and '. -% 'convenience purposes.

'. -% qq!Add a package class

!; -% -%my $count_query = 'SELECT COUNT(*) FROM pkg_class'; -% -%my $link = [ $p.'edit/pkg_class.html?', 'classnum' ]; -% -% <% include( 'elements/browse.html', 'title' => 'Package classes', - 'menubar' => [ 'Main menu' => $p, ], 'html_init' => $html_init, 'name' => 'package classes', + 'disableable' => 1, + 'disabled_statuspos' => 2, 'query' => { 'table' => 'pkg_class', 'hashref' => {}, 'extra_sql' => 'ORDER BY classnum', @@ -25,3 +14,18 @@ 'links' => [ $link, $link ], ) %> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + +my $html_init = + 'Package classes define groups of packages, for reporting and '. + 'convenience purposes.

'. + qq!Add a package class

!; + +my $count_query = 'SELECT COUNT(*) FROM pkg_class'; + +my $link = [ $p.'edit/pkg_class.html?', 'classnum' ]; + +