X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FSetup.pm;h=f26e50ea99799fa4d3231f56a825fe7458974fca;hb=0870a4c1fb02be43ea5524f58650d99c81477681;hp=5e28c136313a2582147b6b3b8380b27e997bb04a;hpb=c26cfa2b417bc3e553237ba399901741f505bbd2;p=freeside.git diff --git a/FS/FS/Setup.pm b/FS/FS/Setup.pm index 5e28c1363..f26e50ea9 100644 --- a/FS/FS/Setup.pm +++ b/FS/FS/Setup.pm @@ -2,7 +2,7 @@ package FS::Setup; use base qw( Exporter ); use strict; -use vars qw( ISA @EXPORT_OK ); +use vars qw( @EXPORT_OK ); #use Tie::DxHash; use Tie::IxHash; use Crypt::OpenSSL::RSA; @@ -363,13 +363,11 @@ sub initial_data { #with billing type Complimentary. Leave the First package dropdown set to #(none). 'cust_main' => [ - { 'agentnum' => 1, #XXX - 'refnum' => 1, #XXX - 'first' => 'System', - 'last' => 'Accounts', - 'payby' => 'COMP', - 'payinfo' => 'system', #or something - 'paydate' => '1/2037', + { 'agentnum' => 1, #XXX + 'refnum' => 1, #XXX + 'first' => 'System', + 'last' => 'Accounts', + 'complimentary' => 'Y', 'bill_location' => $cust_location, 'ship_location' => $cust_location, },