projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix internal_diddb delete & return number to availability, RT#4603
[freeside.git]
/
FS
/
FS
/
part_export
/
internal_diddb.pm
diff --git
a/FS/FS/part_export/internal_diddb.pm
b/FS/FS/part_export/internal_diddb.pm
index
c30d858
..
a330cb0
100644
(file)
--- a/
FS/FS/part_export/internal_diddb.pm
+++ b/
FS/FS/part_export/internal_diddb.pm
@@
-100,7
+100,7
@@
sub _export_insert { #link phone_avail to svcnum
sub _export_delete { #unlink phone_avail from svcnum
my( $self, $svc_phone ) = (shift, shift);
sub _export_delete { #unlink phone_avail from 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);
or return "unparsable phone number: ". $svc_phone->phonenum;
my( $npa, $nxx, $station ) = ($1, $2, $3);