X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Fsql_generic.pm;h=e323d8b5b067ffa08defc70ebd9ab42769b25f06;hp=cf38257fa7b7080d11471c0b301cbe69c7417f20;hb=2a54fd15d357ce97c8becef00d19ed1f711c1c6a;hpb=14a054261683e652c2f1a425ab44e21d9dac72e5 diff --git a/FS/FS/part_pkg/sql_generic.pm b/FS/FS/part_pkg/sql_generic.pm index cf38257fa..e323d8b5b 100644 --- a/FS/FS/part_pkg/sql_generic.pm +++ b/FS/FS/part_pkg/sql_generic.pm @@ -40,6 +40,13 @@ use FS::part_pkg::flat; 'weight' => '56', ); +sub price_info { + my $self = shift; + my $str = $self->SUPER::price_info; + $str .= " plus per-service charges" if $str; + $str; +} + sub calc_recur { my($self, $cust_pkg ) = @_;