save logging information so we have a historical record of exactly when problems...

diff --git a/FS/FS/log_context.pm b/FS/FS/log_context.pm
index 7a59ea7..0ff8cc8 100644 (file)
--- a/FS/FS/log_context.pm
+++ b/FS/FS/log_context.pm
@@ -22,6 +22,7 @@ my @contexts = ( qw(
   queue
   upgrade
   upgrade_taxable_billpkgnum
+  freeside-ipifony-download
   freeside-paymentech-upload
   freeside-paymentech-download
 ) );

diff --git a/FS/bin/freeside-ipifony-download b/FS/bin/freeside-ipifony-download
index b01d806..1e77c3a 100644 (file)
--- a/FS/bin/freeside-ipifony-download
+++ b/FS/bin/freeside-ipifony-download
@@ -315,7 +315,7 @@ sub mylog {
   #warn "$message\n" if $opt{v};
   print STDERR "$message\n" if $opt{v};
   $log ||= FS::Log->new('freeside-ipifony-download');
-  $log->log(@_);
+  $log->log(level=>$level, message=>$message);
 }
 
 =head1 NAME