change credit reasons from freetext to new reason/reason type system (#2777)

[freeside.git] / httemplate / edit / reason.html

diff --git a/httemplate/edit/reason.html b/httemplate/edit/reason.html
index c652a08..512013a 100644 (file)
--- 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 } );
 %