diff options
| author | Jeremy Davis <jeremyd@freeside.biz> | 2014-05-22 16:18:55 -0400 |
|---|---|---|
| committer | Jeremy Davis <jeremyd@freeside.biz> | 2014-05-22 16:18:55 -0400 |
| commit | 8745f4dd18eae385ba414aa82e69d61aa0a1047d (patch) | |
| tree | da563d4a74cf772438015a3ed79eec381920dab1 | |
| parent | 3992c4726337c3b257489a2898cf898efc8a6554 (diff) | |
29049 Fix date formatting in Zintel format
| -rw-r--r-- | FS/FS/cdr/zintel.pm | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/FS/FS/cdr/zintel.pm b/FS/FS/cdr/zintel.pm index 0e44844dd..7d78d1153 100644 --- a/FS/FS/cdr/zintel.pm +++ b/FS/FS/cdr/zintel.pm @@ -16,14 +16,7 @@ use FS::cdr qw(_cdr_date_parser_maker); 'accountcode', #customer 'src', #anumber 'dst', #bnumber - sub { # OriginatingDate and OriginatingTime, two fields in the spec - my ($cdr, $date) = @_; - $date =~ /^(\d{2})\/(\d{2})\/(\d{4})\s*(\d{2}):(\d{2}):(\d{2})$/ - or die "unparseable date: $date"; - my $tmp_date = "$2/$1/$3 $4:$5:$6"; - $cdr->calldate($tmp_date); - },#datetime - + 'calldate', #datetime 'billsec', #duration skip(3), #calltype #status |