projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
22c7daa
)
ensure a valid date is onhand (fixes #2800)
author
jeff
<jeff>
Wed, 5 Dec 2007 14:50:40 +0000
(14:50 +0000)
committer
jeff
<jeff>
Wed, 5 Dec 2007 14:50:40 +0000
(14:50 +0000)
FS/FS/cust_main.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
9d317b6
..
59ebfb5
100644
(file)
--- a/
FS/FS/cust_main.pm
+++ b/
FS/FS/cust_main.pm
@@
-5881,7
+5881,7
@@
sub notify {
$FS::notify_template::_template::company_address =
join("\n", $conf->config('company_address') ). "\n";
$FS::notify_template::_template::company_address =
join("\n", $conf->config('company_address') ). "\n";
- my $paydate = $customer->paydate;
+ my $paydate = $customer->paydate
|| '2037-12-31'
;
$FS::notify_template::_template::first = $customer->first;
$FS::notify_template::_template::last = $customer->last;
$FS::notify_template::_template::company = $customer->company;
$FS::notify_template::_template::first = $customer->first;
$FS::notify_template::_template::last = $customer->last;
$FS::notify_template::_template::company = $customer->company;
@@
-5956,8
+5956,8
@@
sub generate_letter {
my %letter_data = map { $_ => $self->$_ } $self->fields;
$letter_data{payinfo} = $self->mask_payinfo;
my %letter_data = map { $_ => $self->$_ } $self->fields;
$letter_data{payinfo} = $self->mask_payinfo;
- #my $paydate = $self->paydate || '2037-12';
- my $paydate = $self->paydate =~ /^\S+$/ ? $self->paydate : '2037-12';
+ #my $paydate = $self->paydate || '2037-12
-31
';
+ my $paydate = $self->paydate =~ /^\S+$/ ? $self->paydate : '2037-12
-31
';
my $payby = $self->payby;
my ($payyear,$paymonth,$payday) = split (/-/,$paydate);
my $payby = $self->payby;
my ($payyear,$paymonth,$payday) = split (/-/,$paydate);