diff options
author | ivan <ivan> | 2011-11-11 23:29:28 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-11-11 23:29:28 +0000 |
commit | 3462bce6b1627e626cdcece26d504f7c4796cc66 (patch) | |
tree | aa13fb7ddf5f0211aa8fbc8c64dd779a05f35635 /FS | |
parent | a4202b8b4dd50b19d4cb112603be005b66b260c1 (diff) |
DSL status pulling, RT#13656
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/part_export/http_status.pm | 3 | ||||
-rw-r--r-- | FS/FS/svc_dsl.pm | 9 |
2 files changed, 12 insertions, 0 deletions
diff --git a/FS/FS/part_export/http_status.pm b/FS/FS/part_export/http_status.pm index a67684092..5342106b4 100644 --- a/FS/FS/part_export/http_status.pm +++ b/FS/FS/part_export/http_status.pm @@ -33,6 +33,9 @@ sub export_getstatus { { no strict 'refs'; ${$_} = $svc_x->getfield($_) foreach $svc_x->fields; + if ( $svc_x->table eq 'svc_dsl' ) { + ${$_} = $svc_x->$_() foreach (qw( gateway_access_or_phonenum )); + } $url = eval(qq("$urlopt")); } diff --git a/FS/FS/svc_dsl.pm b/FS/FS/svc_dsl.pm index b02e74fa7..5e6a149e8 100644 --- a/FS/FS/svc_dsl.pm +++ b/FS/FS/svc_dsl.pm @@ -279,6 +279,15 @@ sub check { $self->SUPER::check; } +=item gateway_access_or_phonenum + +=cut + +sub gateway_access_or_phonenum { + my $self = shift; + $self->gateway_access_number || $self->phonenum; +} + =item dsl_device Returns the MAC addresses associated with this DSL service, as FS::dsl_device |