diff options
author | ivan <ivan> | 2011-11-11 23:29:27 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-11-11 23:29:27 +0000 |
commit | 36894819ac7b6b9539c353c22d4a65b5f4d8c540 (patch) | |
tree | 078d642997ae3ba2b28e47853596615ab3f512c6 /FS | |
parent | 6ea0319314c9ce9a250109eca712545a5df5f6a9 (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 a676840..5342106 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 b02e74f..5e6a149 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 |