From 2f0fcf49ddaac0758759ff92b8baf11bd098aefc Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 25 Aug 2008 20:33:58 +0000 Subject: [PATCH] fix comparison from svcnum to svcpart --- FS/FS/part_event/Condition/cust_bill_has_service.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FS/FS/part_event/Condition/cust_bill_has_service.pm b/FS/FS/part_event/Condition/cust_bill_has_service.pm index be7ea2b02..7e63e0e6d 100644 --- a/FS/FS/part_event/Condition/cust_bill_has_service.pm +++ b/FS/FS/part_event/Condition/cust_bill_has_service.pm @@ -32,7 +32,7 @@ sub condition { my($self, $cust_bill) = @_; my $servicenum = $self->option('has_service'); - grep { $servicenum == $_->svcnum } + grep { $servicenum == $_->svcpart } map { $_->cust_pkg->cust_svc } $cust_bill->cust_bill_pkg ; } -- 2.11.0