X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-fetch;h=7b674ed7eeaf9f9bd55b9829d3c36300d6bb1fe8;hb=4125a128eaa40c751c89a69c2f9888463a78c6f3;hp=89a4f29af76d18724321d56d8c46376c6d6bb54b;hpb=9509e5bfb7f9331303153cac24d7bfecbe2ea9f1;p=freeside.git diff --git a/FS/bin/freeside-fetch b/FS/bin/freeside-fetch index 89a4f29af..7b674ed7e 100755 --- a/FS/bin/freeside-fetch +++ b/FS/bin/freeside-fetch @@ -35,14 +35,18 @@ foreach my $employee (@employees) { }; my $ua = new LWP::UserAgent; + $ua->timeout(1800); #30m, some reports can take a while $ua->agent("FreesideFetcher/0.1 " . $ua->agent); my $req = new HTTP::Request GET => $url; my $res = $ua->request($req); + my $conf = new FS::Conf; + my $subject = $conf->config('email_report-subject') || 'Freeside report'; + my %options = ( 'from' => $email_address, 'to' => $email_address, - 'subject' => 'subject', + 'subject' => $subject, 'body' => $res->content, );