diff --git a/lib/admin/Controller/billing.pm b/lib/admin/Controller/billing.pm index 6e2ed26..78b0c43 100644 --- a/lib/admin/Controller/billing.pm +++ b/lib/admin/Controller/billing.pm @@ -262,6 +262,10 @@ sub do_edit_bilprof : Local { $settings{interval_unit} = $c->request->params->{interval_unit} || 'month'; $settings{interval_count} = $c->request->params->{interval_count} || 1; + if (length $settings{name} > 31) { + $messages{name} = 'Client.Syntax.ProfileNameTooLong'; + } + $settings{interval_charge} = $c->request->params->{interval_charge}; if(length $settings{interval_charge}) { if($settings{interval_charge} =~ /^[+]?\d+(?:[.,]\d\d?)?$/) {