X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Finternal_diddb.pm;fp=FS%2FFS%2Fpart_export%2Finternal_diddb.pm;h=d7b5587b114378c0dadd4ddcc8d8fbdaba9fbaf4;hb=bd4151f99f8a2249977e65947cc8762ec50166e2;hp=5e14873673e76de548c14ebbb039bbc046b52cc2;hpb=96f9e3f0b79a98863023a1bdd29b9dc80738c1b1;p=freeside.git diff --git a/FS/FS/part_export/internal_diddb.pm b/FS/FS/part_export/internal_diddb.pm index 5e1487367..d7b5587b1 100644 --- a/FS/FS/part_export/internal_diddb.pm +++ b/FS/FS/part_export/internal_diddb.pm @@ -70,7 +70,7 @@ sub get_dids { sub _export_insert { #link phone_avail to svcnum my( $self, $svc_phone ) = (shift, shift); - $svc_phone =~ /^(\d{3})(\d{3})(\d+)$/ + $svc_phone->phonenum =~ /^(\d{3})(\d{3})(\d+)$/ or return "unparsable phone number: ". $svc_phone->phonenum; my( $npa, $nxx, $station ) = ($1, $2, $3);