X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fpart_pkg%2Ftorrus_Common.pm;fp=FS%2FFS%2Fpart_pkg%2Ftorrus_Common.pm;h=2eda725f7293bd459e31ab4043ac6014ad18c5c8;hb=5fa2ec5b24f52ddb14e569970ccb8a24cadbc6b1;hp=66624ada00c7afed48b2928c3e89e4dbc86bca80;hpb=5d1c873c38990030fc082294ff728518460ccead;p=freeside.git diff --git a/FS/FS/part_pkg/torrus_Common.pm b/FS/FS/part_pkg/torrus_Common.pm index 66624ada0..2eda725f7 100644 --- a/FS/FS/part_pkg/torrus_Common.pm +++ b/FS/FS/part_pkg/torrus_Common.pm @@ -7,6 +7,13 @@ our %info = ( 'disabled' => 1 ); #torrus_Common not a usable price plan directly our $DEBUG = 1; +sub price_info { + my $self = shift; + my $str = $self->SUPER::price_info; + $str .= " plus usage" if $str; + $str; +} + sub calc_recur { my $self = shift; my($cust_pkg, $sdate, $details, $param ) = @_;