[freeside-commits] freeside/FS/FS Record.pm,1.214.2.3,1.214.2.4
Mark Wells
mark at wavetail.420.am
Tue Apr 5 09:38:23 PDT 2011
Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv30163/FS/FS
Modified Files:
Tag: FREESIDE_2_1_BRANCH
Record.pm
Log Message:
Telstra CDR format, #10159
Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.214.2.3
retrieving revision 1.214.2.4
diff -u -w -d -r1.214.2.3 -r1.214.2.4
--- Record.pm 13 Feb 2011 07:19:51 -0000 1.214.2.3
+++ Record.pm 5 Apr 2011 16:38:20 -0000 1.214.2.4
@@ -1747,7 +1747,7 @@
eval "use Parse::FixedLength;";
die $@ if $@;
- $parser = new Parse::FixedLength $fixedlength_format;
+ $parser = Parse::FixedLength->new($fixedlength_format);
}
else {
@@ -1852,6 +1852,9 @@
} elsif ( $type eq 'fixedlength' ) {
+ last unless scalar(@buffer);
+ $line = shift(@buffer);
+
@columns = $parser->parse($line);
} elsif ( $type eq 'xls' ) {
More information about the freeside-commits
mailing list