X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr%2Fcallplus.pm;fp=FS%2FFS%2Fcdr%2Fcallplus.pm;h=1fcfa6335db36cce406459c718c5d9b6524756b0;hb=3ac361c2b6b52209436b828be21ef8c416ba8ffc;hp=fa6c799ad5e433a2a54d467818a014e89f7ce7d8;hpb=e71dd08fc2e0aa3ee8cdbeb4e1f39f04898f773b;p=freeside.git diff --git a/FS/FS/cdr/callplus.pm b/FS/FS/cdr/callplus.pm index fa6c799ad..1fcfa6335 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 ], );