Earthlink CDR's import additional info

[freeside.git] / FS / FS / cdr / earthlink.pm

diff --git a/FS/FS/cdr/earthlink.pm b/FS/FS/cdr/earthlink.pm
index da0d545..cfd1cb6 100644 (file)
--- a/FS/FS/cdr/earthlink.pm
+++ b/FS/FS/cdr/earthlink.pm
@@ -17,7 +17,7 @@ use Date::Parse;
        'accountcode',                  #Account number
               skip(2),                 #SERVICE LOC / BILL NUMBER 
        sub { my($cdr, $date) = @_;  
-       
+       $date;  
        },                              #date 
        sub { my($cdr, $time) = @_;
 
@@ -36,6 +36,8 @@ use Date::Parse;
         },                             #TERM NUMBER
        skip(2),                        #TERM CITY / TERM STATE
        _cdr_min_parser_maker,          #MINUTES
+       skip(1),                        #AMOUNT
+       disposition,                    #Call Type
   ],
 );