X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Freason_type.html;h=ea5650ec3a2d7513aabb0da072e17fadf5a31150;hp=056544e5dca64865cd142c479164d0437a92899c;hb=ac8410cdb67639afeb84c84e975fffadf3e6cce1;hpb=e8a09e945986a32f9b7d0a5d546142ada91654ca diff --git a/httemplate/edit/reason_type.html b/httemplate/edit/reason_type.html index 056544e5d..ea5650ec3 100644 --- a/httemplate/edit/reason_type.html +++ b/httemplate/edit/reason_type.html @@ -1,9 +1,3 @@ -% -%$cgi->param('class') =~ /^(\w)$/; -%my $class = $1; -% -%my $classname = $FS::reason_type::class_name{$class}; -% <% include( 'elements/edit.html', 'name' => $classname . ' Reason Type', 'table' => 'reason_type', @@ -22,3 +16,14 @@ 'new_hashref_callback' => sub {{ 'class' => $class }}, ) %> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + +$cgi->param('class') =~ /^(\w)$/; +my $class = $1; + +my $classname = $FS::reason_type::class_name{$class}; + +