diff options
| author | Mitch Jackson <mitch@freeside.biz> | 2019-01-08 00:01:21 -0500 |
|---|---|---|
| committer | Mitch Jackson <mitch@freeside.biz> | 2019-01-08 00:01:21 -0500 |
| commit | e61149f7135b750b2b6ff6ee94f461460163ddea (patch) | |
| tree | 1e92d72fb57965731b473262b626b179085ad8d1 /FS/bin/freeside-eftca-download | |
| parent | ca5b439d4e874bec01a346f53f2bd9e50d612151 (diff) | |
RT# 81701 Add system log lines for EFT Canada upload/download
Diffstat (limited to 'FS/bin/freeside-eftca-download')
| -rwxr-xr-x | FS/bin/freeside-eftca-download | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/FS/bin/freeside-eftca-download b/FS/bin/freeside-eftca-download index caf9e0e70..56d82c7f5 100755 --- a/FS/bin/freeside-eftca-download +++ b/FS/bin/freeside-eftca-download @@ -57,7 +57,10 @@ my $conf = new FS::Conf; my @agents; if ( $conf->exists('batch-spoolagent') ) { - @agents = qsearch('agent', { 'disabled' => '' }); + local $@; + eval { @agents = qsearch('agent', { 'disabled' => '' }); }; + log_error_and_die("Fatal database error: $@") + if $@; } else { @agents = (1); } |