summaryrefslogtreecommitdiff
path: root/FS/FS/cdr/callplus.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/cdr/callplus.pm')
-rw-r--r--FS/FS/cdr/callplus.pm9
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
],
);