From d90a6a6e37b227e9265be011197ab20b56bfa7ca Mon Sep 17 00:00:00 2001 From: ivan Date: Sun, 16 Dec 2001 23:50:10 +0000 Subject: [PATCH] eek nasty bug --- FS/FS/cust_main.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index ad6d46e96..a36d125be 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -859,7 +859,8 @@ sub bill { qsearch('cust_pkg', { 'custnum' => $self->custnum } ) ) { - next if $cust_pkg->cancel; + #NO!! next if $cust_pkg->cancel; + next if $cust_pkg->getfield('cancel'); #? to avoid use of uninitialized value errors... ? $cust_pkg->setfield('bill', '') @@ -1880,7 +1881,7 @@ sub append_fuzzyfiles { =head1 VERSION -$Id: cust_main.pm,v 1.49 2001-12-15 00:17:38 ivan Exp $ +$Id: cust_main.pm,v 1.50 2001-12-16 23:50:10 ivan Exp $ =head1 BUGS -- 2.20.1