From 083055aebf83987941affc4da3184dec0f27d2ae Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Thu, 10 Dec 2015 01:57:22 -0800 Subject: [PATCH] avoid throwing an error on unlinked services, RT#31388 --- FS/FS/cust_svc.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm index 376ef0263..0223f934b 100644 --- a/FS/FS/cust_svc.pm +++ b/FS/FS/cust_svc.pm @@ -1252,7 +1252,7 @@ sub _check_provision_hold { # check status of cust_pkg my $cust_pkg = $self->cust_pkg; - return '' unless $cust_pkg->status eq 'on hold'; + return '' unless $cust_pkg && $cust_pkg->status eq 'on hold'; # check flag on this svc # small false laziness with $self->pkg_svc -- 2.11.0