projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix signup_server-realtime
[freeside.git]
/
fs_signup
/
fs_signup_server
diff --git
a/fs_signup/fs_signup_server
b/fs_signup/fs_signup_server
index
69a07f9
..
0583887
100755
(executable)
--- a/
fs_signup/fs_signup_server
+++ b/
fs_signup/fs_signup_server
@@
-165,7
+165,7
@@
while (1) {
warn "[fs_signup_server] Sending results...\n" if $Debug;
print $writer $error, "\n";
warn "[fs_signup_server] Sending results...\n" if $Debug;
print $writer $error, "\n";
- if ( $conf->
config
('signup_server-realtime') ) {
+ if ( $conf->
exists
('signup_server-realtime') ) {
my $bill_error = $cust_main->bill;
warn "[fs_signup_server] error billing new customer: $bill_error"
my $bill_error = $cust_main->bill;
warn "[fs_signup_server] error billing new customer: $bill_error"
@@
-190,6
+190,7
@@
while (1) {
#false laziness w/FS::cust_bill::send & FS::cust_pay::delete
use Mail::Header;
use Mail::Internet;
#false laziness w/FS::cust_bill::send & FS::cust_pay::delete
use Mail::Header;
use Mail::Internet;
+ use Date::Format;
my $from = $conf->config('invoice_from'); #??? as good as any
$ENV{MAILADDRESS} = $from;
my $header = new Mail::Header ( [
my $from = $conf->config('invoice_from'); #??? as good as any
$ENV{MAILADDRESS} = $from;
my $header = new Mail::Header ( [