diff options
author | ivan <ivan> | 2008-08-03 00:54:09 +0000 |
---|---|---|
committer | ivan <ivan> | 2008-08-03 00:54:09 +0000 |
commit | a8acb88758229305e88fa8cf13bc31dc902719ff (patch) | |
tree | d548a9d757c0ca2d41c34d14e8af44549ce5acda /FS/FS/cdr | |
parent | 44395102c7cc0a2b49d075ea8ec9573e499d4214 (diff) |
doh, fix regex
Diffstat (limited to 'FS/FS/cdr')
-rw-r--r-- | FS/FS/cdr/simple2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/cdr/simple2.pm b/FS/FS/cdr/simple2.pm index a4b5fdb..2e4fb90 100644 --- a/FS/FS/cdr/simple2.pm +++ b/FS/FS/cdr/simple2.pm @@ -21,7 +21,7 @@ use FS::cdr qw(_cdr_min_parser_maker); $date =~ /^(\d\d(\d\d)?)\/(\d{1,2})\/(\d{1,2})$/ or die "unparsable date: $date"; #maybe we shouldn't die... #$cdr->startdate( timelocal(0, 0, 0 ,$3, $2-1, $1) ); - ($tmp_mday, $tmp_mon, $tmp_year) = ( $3, $2-1, $1 ); + ($tmp_mday, $tmp_mon, $tmp_year) = ( $4, $3-1, $1 ); }, #Time |