[freeside-commits] freeside/FS/FS/ClientAPI Signup.pm,1.36,1.37

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/ClientAPI
In directory wavetail:/tmp/cvs-serv19031

Modified Files:
	Signup.pm 
Log Message:
fix bug: usage of promo code broke agent-specific advertising sources

Index: Signup.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/Signup.pm,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -d -r1.36 -r1.37
--- Signup.pm	12 Feb 2007 17:56:51 -0000	1.36
+++ Signup.pm	20 Mar 2007 22:10:38 -0000	1.37
@@ -181,8 +181,9 @@
       unless @{ $signup_info->{'part_pkg'} };
   }
 
-  if ( $agentnum && ! @{ $signup_info->{'part_pkg'} } ) {
-    $signup_info->{'part_pkg'} = $signup_info->{'agentnum2part_pkg'}{$agentnum};
+  if ( $agentnum ) {
+    $signup_info->{'part_pkg'} = $signup_info->{'agentnum2part_pkg'}{$agentnum}
+      unless @{ $signup_info->{'part_pkg'} };
 
     $signup_info->{'part_referral'} =
       [