projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add Net20 invoice terms, closes: #3219
[freeside.git]
/
FS
/
FS
/
Conf.pm
diff --git
a/FS/FS/Conf.pm
b/FS/FS/Conf.pm
index
a763ed4
..
b7edd0d
100644
(file)
--- a/
FS/FS/Conf.pm
+++ b/
FS/FS/Conf.pm
@@
-1,6
+1,7
@@
package FS::Conf;
use vars qw($base_dir @config_items @base_items @card_types $DEBUG);
package FS::Conf;
use vars qw($base_dir @config_items @base_items @card_types $DEBUG);
+use Carp;
use IO::File;
use File::Basename;
use MIME::Base64;
use IO::File;
use File::Basename;
use MIME::Base64;
@@
-84,7
+85,7
@@
global default if one is present.
sub _usecompat {
my ($self, $method) = (shift, shift);
sub _usecompat {
my ($self, $method) = (shift, shift);
-
warn
"NO CONFIGURATION RECORDS FOUND -- USING COMPATIBILITY MODE"
+
carp
"NO CONFIGURATION RECORDS FOUND -- USING COMPATIBILITY MODE"
if use_confcompat;
my $compat = new FS::Conf_compat17 ("$base_dir/conf." . datasrc);
$compat->$method(@_);
if use_confcompat;
my $compat = new FS::Conf_compat17 ("$base_dir/conf." . datasrc);
$compat->$method(@_);
@@
-842,7
+843,7
@@
worry that config_items is freeside-specific and icky.
'section' => 'billing',
'description' => 'Optional default invoice term, used to calculate a due date printed on invoices.',
'type' => 'select',
'section' => 'billing',
'description' => 'Optional default invoice term, used to calculate a due date printed on invoices.',
'type' => 'select',
- 'select_enum' => [ '', 'Payable upon receipt', 'Net 0', 'Net 10', 'Net 15', 'Net 30', 'Net 45', 'Net 60' ],
+ 'select_enum' => [ '', 'Payable upon receipt', 'Net 0', 'Net 10', 'Net 15', 'Net
20', 'Net
30', 'Net 45', 'Net 60' ],
},
{
},
{