diff options
Diffstat (limited to 'FS/FS/cdr/callplus.pm')
-rw-r--r-- | FS/FS/cdr/callplus.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/FS/FS/cdr/callplus.pm b/FS/FS/cdr/callplus.pm index fa6c799..1fcfa63 100644 --- a/FS/FS/cdr/callplus.pm +++ b/FS/FS/cdr/callplus.pm @@ -51,7 +51,14 @@ use Time::Local 'timelocal'; $value =~ s/^\$//; $cdr->upstream_price($value); }, - skip(4), # Smartcode, Smartcode Description, Type, SubType + skip(2), # Smartcode, Smartcode Description + sub { # Type. "I" = international, which matters. + my ($cdr, $value) = @_; + if ($value eq 'I') { + $cdr->set('dst', '+' . $cdr->dst); + } # else leave it alone + }, + '', # SubType ], ); |