X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr%2Fzintel.pm;h=7d78d1153b6fe5b1b48e970a051a3ea6ddb962dd;hb=8745f4dd18eae385ba414aa82e69d61aa0a1047d;hp=0e44844dd9c8c01ce266f68bf12613f4051f5a2f;hpb=3992c4726337c3b257489a2898cf898efc8a6554;p=freeside.git 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