diff options
author | jeff <jeff> | 2009-12-21 14:36:50 +0000 |
---|---|---|
committer | jeff <jeff> | 2009-12-21 14:36:50 +0000 |
commit | 250e277720fbe288875736c7f5f957668f4c1880 (patch) | |
tree | 36d9a1084bcef8b3addbe3fb32be0edfe073f46c /FS | |
parent | 45c6b7021b30c49742b578a2f3ba13fb35f5222c (diff) |
move cch conf into database and add a couple small tools for processing updates more manually
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/Conf.pm | 4 | ||||
-rw-r--r-- | FS/FS/tax_rate.pm | 13 |
2 files changed, 10 insertions, 7 deletions
diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm index 07c25c46a..47555a348 100644 --- a/FS/FS/Conf.pm +++ b/FS/FS/Conf.pm @@ -1677,8 +1677,8 @@ worry that config_items is freeside-specific and icky. { 'key' => 'taxdatadirectdownload', 'section' => 'billing', #well - 'description' => 'Enable downloading tax data directly from the vendor site', - 'type' => 'checkbox', + 'description' => 'Enable downloading tax data directly from the vendor site. at least three lines: URL, username, and password.j', + 'type' => 'textarea', }, { diff --git a/FS/FS/tax_rate.pm b/FS/FS/tax_rate.pm index 58be8cba6..93550b178 100644 --- a/FS/FS/tax_rate.pm +++ b/FS/FS/tax_rate.pm @@ -1398,11 +1398,14 @@ sub process_download_and_update { eval "use XBase;"; die $@ if $@; - my $conffile = '%%%FREESIDE_CONF%%%/cchconf'; - my $conffh = new IO::File "<$conffile" or die "can't open $conffile: $!\n"; - my ( $urls, $secret, $states ) = - map { /^(.*)$/ or die "bad config line in $conffile: $_\n"; $1 } - <$conffh>; + my $conf = new FS::Conf; + die "direct download of tax data not enabled\n" + unless $conf->exists('taxdatadirectdownload'); + my ( $urls, $username, $secret, $states ) = + $conf->config('taxdatadirectdownload'); + die "No tax download URL provided. ". + "Did you set the taxdatadirectdownload configuration value?\n" + unless $urls; $dir .= '/cch'; |