X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpay_batch.pm;h=6a27554945c9eb6d65e592360f060d34c4731e7a;hb=f8b62efe57d6b2c7d1d5a6514fb78d3fcdbbb6cf;hp=59ff2c3a0f457279886f817107ca92d24f09c8b7;hpb=20b563c398c5c9264a998d31ae0d3d95454d526e;p=freeside.git diff --git a/FS/FS/pay_batch.pm b/FS/FS/pay_batch.pm index 59ff2c3a0..6a2755494 100644 --- a/FS/FS/pay_batch.pm +++ b/FS/FS/pay_batch.pm @@ -272,11 +272,12 @@ sub import_results { }; push @all_values, [ $csv->fields(), $line ]; }elsif ($filetype eq 'fixed'){ - my @values = ( $line =~ /$formatre/, $line ); + my @values = ( $line =~ /$formatre/ ); unless (@values) { $dbh->rollback if $oldAutoCommit; return "can't parse: ". $line; }; + push @values, $line; push @all_values, \@values; }else{ $dbh->rollback if $oldAutoCommit;