X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_event%2FCondition%2Fhas_pkgpart.pm;h=d85e1bd43fb3c4544b3a336e4abb4716eee2f565;hb=546f156e3b10675045dadd5ee058a7cb4ed5cdc4;hp=c54b7e256ac3ecad80e6b886fb8560bf718d7284;hpb=63a268637b2d51a8766412617724b9436439deb6;p=freeside.git diff --git a/FS/FS/part_event/Condition/has_pkgpart.pm b/FS/FS/part_event/Condition/has_pkgpart.pm index c54b7e256..d85e1bd43 100644 --- a/FS/FS/part_event/Condition/has_pkgpart.pm +++ b/FS/FS/part_event/Condition/has_pkgpart.pm @@ -4,7 +4,7 @@ use strict; use base qw( FS::part_event::Condition ); -sub description { 'Customer has uncancelled package of specified definitions'; } +sub description { 'Customer has uncancelled specific package(s)'; } sub eventtable_hashref { { 'cust_main' => 1, @@ -27,7 +27,6 @@ sub condition { my $cust_main = $self->cust_main($object); - #XXX test my $if_pkgpart = $self->option('if_pkgpart') || {}; grep $if_pkgpart->{ $_->pkgpart }, $cust_main->ncancelled_pkgs;