X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Finfostreet.pm;h=e6d68c1e298f2a1f7f281826e9674e8d4388984a;hp=40dee487af1e67559ad0c07c0a0cc24be0e8a87f;hb=88f0ff8531750c6eafd0495b7bbdc440d78db379;hpb=0eea8f4255a5c65666db673b302de7585f6f06a1

diff --git a/FS/FS/part_export/infostreet.pm b/FS/FS/part_export/infostreet.pm
index 40dee487a..e6d68c1e2 100644
--- a/FS/FS/part_export/infostreet.pm
+++ b/FS/FS/part_export/infostreet.pm
@@ -32,11 +32,16 @@ sub _export_insert {
     return $error if $error;
   }
 
-  $self->infostreet_queue( $svc_acct->svcnum,
-    'setContactField', $accountID, 'email', $cust_main->invoicing_list )
+  my @emails = grep { $_ ne 'POST' } $cust_main->invoicing_list;
+  if ( @emails ) {
+    my $error = $self->infostreet_queue( $svc_acct->svcnum,
+      'setContactField', $accountID, 'email', $emails[0] );
+    return $error if $error;
+  }
+
   #this one is kinda noment-specific
-  || $self->infostreet_queue( $svc_acct->svcnum,
-         'setContactField', $accountID, 'title', $cust_main->agent->agent );
+  $self->infostreet_queue( $svc_acct->svcnum,
+    'setContactField', $accountID, 'title', $cust_main->agent->agent );
 
 }