diff options
Diffstat (limited to 'httemplate/browse')
| -rw-r--r-- | httemplate/browse/reason.html | 10 | ||||
| -rw-r--r-- | httemplate/browse/reason_type.html | 6 |
2 files changed, 4 insertions, 12 deletions
diff --git a/httemplate/browse/reason.html b/httemplate/browse/reason.html index 94141eea3..49b452cf8 100644 --- a/httemplate/browse/reason.html +++ b/httemplate/browse/reason.html @@ -38,14 +38,10 @@ die "access denied" $cgi->param('class') =~ /^(\w)$/ or die "illegal class"; my $class = $1; -my %classmap = ( 'C' => 'cancel', - 'S' => 'suspend', - ); +my $classname = $FS::reason_type::class_name{$class};; +my $classpurpose = $FS::reason_type::class_purpose{$class};; -my $classname = $classmap{$class}; - -my $html_init = ucfirst($classname) . -" reasons explain why we $classname a package.<BR><BR>". +my $html_init = ucfirst($classname). " reasons $classpurpose.<BR><BR>". qq!<A HREF="${p}edit/reason.html?class=$class">!. "<I>Add a $classname reason</I></A><BR><BR>"; diff --git a/httemplate/browse/reason_type.html b/httemplate/browse/reason_type.html index 09f451c9f..6b444bad1 100644 --- a/httemplate/browse/reason_type.html +++ b/httemplate/browse/reason_type.html @@ -33,11 +33,7 @@ die "access denied" $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 $html_init = ucfirst($classname) . " reason types allow groups of $classname reasons for reporting purposes." . |
