X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_event%2FAction%2Fsuspend_if_pkgpart.pm;h=6f2007c933b10c32d700b4ebb62400c72a89326a;hb=389b6f1116c3309c2ee57a6c295ed1a793503095;hp=9bdc9be538019e115d9f2a06f7e6ba217038c4e3;hpb=9509e5bfb7f9331303153cac24d7bfecbe2ea9f1;p=freeside.git diff --git a/FS/FS/part_event/Action/suspend_if_pkgpart.pm b/FS/FS/part_event/Action/suspend_if_pkgpart.pm index 9bdc9be53..6f2007c93 100644 --- a/FS/FS/part_event/Action/suspend_if_pkgpart.pm +++ b/FS/FS/part_event/Action/suspend_if_pkgpart.pm @@ -3,9 +3,9 @@ package FS::part_event::Action::suspend_if_pkgpart; use strict; use base qw( FS::part_event::Action ); -sub description { - 'Suspend packages'; -} +sub description { 'Suspend packages'; } + +#i should be deprecated in favor of using the if_pkgpart condition sub option_fields { ( @@ -18,12 +18,10 @@ sub option_fields { 'reason_class' => 'S', }, ); -}; - -sub default_weight { - 10; } +sub default_weight { 10; } + sub do_action { my( $self, $cust_object ) = @_;