X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fdiscount.pm;h=dd696049572a652c0769fa6a552fad9f4cd6f545;hb=639929eeb498d7f893e09084b72bccbaf91bf894;hp=e66d78cedee4f6112283e52be316a617d20dea00;hpb=e58318fb3653e96097c0c3af84369d3397619cc4;p=freeside.git diff --git a/FS/FS/discount.pm b/FS/FS/discount.pm index e66d78ced..dd6960495 100644 --- a/FS/FS/discount.pm +++ b/FS/FS/discount.pm @@ -175,13 +175,18 @@ sub description_short { my $conf = new FS::Conf; my $money_char = $conf->config('money_char') || '$'; - my $desc = $self->name ? $self->name.': ' : ''; - $desc .= $money_char. sprintf('%.2f/month ', $self->amount) + my $desc; + if ( $self->name ) { + $desc = $self->name . ': '; + } else { + $desc = 'Discount of '; + } + $desc .= $money_char. sprintf('%.2f/month', $self->amount) if $self->amount > 0; ( my $percent = $self->percent ) =~ s/\.0+$//; $percent =~ s/(\.\d*[1-9])0+$/$1/; - $desc .= $percent. '% ' + $desc .= $percent. '%' if $self->percent > 0; $desc; @@ -193,7 +198,13 @@ sub description { ( my $months = $self->months ) =~ s/\.0+$//; $months =~ s/(\.\d*[1-9])0+$/$1/; - $desc .= " for $months months" if $months; + if ($months) { + if ($months == 1) { + $desc .= " for 1 month"; + } else { + $desc .= " for $months months"; + } + } $desc .= ', applies to setup' if $self->setup;