X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Freason.html;h=620a2ea152a10ba15d1dd3655b82525a8a1018bd;hb=dd65ba99bb9281571f19744154a3b03bcd3f01ab;hp=7c0722ceaf3d797d85dfde7e865ff2af11a4af57;hpb=9811b8ce65909a293810ddbcd8c9b5ca963fba01;p=freeside.git

diff --git a/httemplate/edit/reason.html b/httemplate/edit/reason.html
index 7c0722cea..620a2ea15 100644
--- a/httemplate/edit/reason.html
+++ b/httemplate/edit/reason.html
@@ -2,10 +2,7 @@
 % $cgi->param('class') =~ /^(\w)$/ or die "illegal class";
 % my $class=$1;
 %
-% my %classmap = ('C' => 'cancel',
-%              'S' => 'suspend',
-%             );
-% my $classname = $classmap{$class};
+% my $classname = $FS::reason_type::class_name{$class};
 %
 % my (@types) = qsearch( 'reason_type', { 'class' => $class } );
 %
@@ -25,6 +22,8 @@
 		 'fields' => [
 			       { 'field' => 'reason_type',
 			         'type'  => 'select',
+                                 #XXX use something more sane than a hashref
+                                 #then fix tr-select.html
 				 'value' => { 'vcolumn' => 'typenum',
 				              'ccolumn' => 'type',
 					      'values'  => \@types,
@@ -32,7 +31,7 @@
 			       },
 			       'reason',
 			       { 'field' => 'class',
-			         'type'  => 'fixedhidden',
+			         'type'  => 'hidden',
 				 'value' => $class,
 			       },
 			       { 'field' => 'disabled',
@@ -43,3 +42,9 @@
                  'viewall_url' => $p . "browse/reason.html?class=$class",
            )
 %>
+<%init>
+
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
+
+</%init>