X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_main%2FAPI.pm;h=440560029b597062e1addf1c9250491ecb940132;hb=1be5d7ada63dc18682e4b6747c66bfed4f34945c;hp=1e1723474136e34cb0fe630ec5938b44dce7daaf;hpb=a51b71cdea80993d815ecd9c79132df0a68b78b6;p=freeside.git

diff --git a/FS/FS/cust_main/API.pm b/FS/FS/cust_main/API.pm
index 1e1723474..440560029 100644
--- a/FS/FS/cust_main/API.pm
+++ b/FS/FS/cust_main/API.pm
@@ -2,6 +2,7 @@ package FS::cust_main::API;
 
 use strict;
 use FS::Conf;
+use FS::part_tag;
 
 =item API_getinfo FIELD => VALUE, ...
 
@@ -104,7 +105,8 @@ sub API_insert {
   #same for refnum like signup_server-default_refnum?
 
   my $cust_main = new FS::cust_main ( { # $class->new( {
-      'payby'         => 'BILL',
+      'payby'  => 'BILL',
+      'tagnum' => [ FS::part_tag->default_tags ],
 
       map { $_ => $opt{$_} } qw(
         agentnum refnum agent_custid referral_custnum