projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add troop CDRs, RT#4413
[freeside.git]
/
bin
/
cdr.sftp_and_import
diff --git
a/bin/cdr.sftp_and_import
b/bin/cdr.sftp_and_import
index
f68d70c
..
57d4e87
100755
(executable)
--- 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;
warn "Processing $filename\n" if $opt_v;
- open(FILE, "$cachedir/$filename") or die "can't read $cachedir/$filename: $!";
-
my $error = FS::cdr::batch_import( {
my $error = FS::cdr::batch_import( {
- 'file
handle' => *FILE{IO},
- 'format'
=> $format,
- 'cdrbatch'
=> $filename,
- 'empty_ok'
=> 1,
+ 'file
' => "$cachedir/$filename"
+ 'format' => $format,
+ 'cdrbatch' => $filename,
+ 'empty_ok' => 1,
} );
die $error if $error;
} );
die $error if $error;