X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=bin%2Fcdr.sftp_and_import;h=57d4e871eab7abacc29eef256b4b8b6b2e4915ae;hb=1d5f7cb129a7fade6ef9283977b2781ece183797;hp=f68d70c7689d9f9bf2066a611a9c5446c59b43bc;hpb=c47123a101c99b35c3c7b1be5b003b773ae00e06;p=freeside.git

diff --git a/bin/cdr.sftp_and_import b/bin/cdr.sftp_and_import
index f68d70c76..57d4e871e 100755
--- a/bin/cdr.sftp_and_import
+++ b/bin/cdr.sftp_and_import
@@ -61,13 +61,11 @@ foreach my $file ( @$ls ) {
 
   warn "Processing $filename\n" if $opt_v;
 
-  open(FILE, "$cachedir/$filename") or die "can't read $cachedir/$filename: $!";
-
   my $error = FS::cdr::batch_import( {
-    'filehandle' => *FILE{IO},
-    'format'     => $format,
-    'cdrbatch'   => $filename,
-    'empty_ok'   => 1,
+    'file'     => "$cachedir/$filename"
+    'format'   => $format,
+    'cdrbatch' => $filename,
+    'empty_ok' => 1,
   } );
   die $error if $error;