X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Fsesmon_minute.pm;h=b86cffd76683bf8e59ffb3a7764fc2652abef9a5;hb=f3e0ac2b009c4edd5692cb587ff709dac2223ebe;hp=9c8dfd1b7c42b3fa73179682717f1f2dd5ab0555;hpb=d3ce5efd1ec0e1a715a154696e2b0aa86e51c27b;p=freeside.git diff --git a/FS/FS/part_pkg/sesmon_minute.pm b/FS/FS/part_pkg/sesmon_minute.pm index 9c8dfd1b7..b86cffd76 100644 --- a/FS/FS/part_pkg/sesmon_minute.pm +++ b/FS/FS/part_pkg/sesmon_minute.pm @@ -8,6 +8,7 @@ use FS::part_pkg::flat; @ISA = qw(FS::part_pkg::flat); %info = ( + 'disabled' => 1, #internal session db deprecated (or at least on hold) 'name' => 'Base charge plus charge per-minute from the session monitor', 'shortname' => 'Session monitor (per-minute)', 'inherit_fields' => [ 'global_Mixin' ], @@ -25,6 +26,12 @@ use FS::part_pkg::flat; 'weight' => 80, ); +sub price_info { + my $self = shift; + my $str = $self->SUPER::price_info; + $str .= " plus usage" if $str; + $str; +} sub calc_recur { my( $self, $cust_pkg ) = @);