From 0a4c53ac3a8feae51578012e55a6db5ad0d56ba7 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Thu, 25 Jun 2009 19:55:35 +0000
Subject: [PATCH] eliminate harmless warning log spam:  Argument "" isn't
 numeric in numeric eq (==) at
 /usr/local/share/perl/5.8.8/FS/ClientAPI/Signup.pm line 57

---
 FS/FS/ClientAPI/Signup.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm
index d0ac419ec..32cdd9f0a 100644
--- a/FS/FS/ClientAPI/Signup.pm
+++ b/FS/FS/ClientAPI/Signup.pm
@@ -61,7 +61,9 @@ sub signup_info {
                   } }
                 grep { $_->svcpart($svc_x)
                        && ( $href->{ $_->pkgpart }
-                            || $_->agentnum == $agent->agentnum
+                            || ( $_->agentnum
+                                 && $_->agentnum == $agent->agentnum
+                               )
                           )
                      }
                   qsearch( 'part_pkg', { 'disabled' => '' } )
-- 
2.11.0