diff options
-rw-r--r-- | FS/FS/part_export/communigate_pro.pm | 17 | ||||
-rwxr-xr-x | httemplate/view/svc_forward.cgi | 3 |
2 files changed, 20 insertions, 0 deletions
diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index 42f562c..3ac0dfd 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -835,6 +835,23 @@ sub export_getsettings_svc_acct { } +sub export_getsettings_svc_forward { + my($self, $svc_forward, $settingsref, $defaultref ) = @_; + + my $dest = eval { $self->communigate_pro_runcommand( + 'GetForwarder', + ($svc_forward->src || $svc_forward->srcsvc_acct->email), + ) }; + return $@ if $@; + + my $settings = { 'Destination' => $dest }; + + %{$settingsref} = %$settings; + %{$defaultref} = (); + + ''; +} + sub _rule2string { my $rule = shift; my($priority, $name, $conditions, $actions, $comment) = @$rule; diff --git a/httemplate/view/svc_forward.cgi b/httemplate/view/svc_forward.cgi index 43d8a4e..15b5ae5 100755 --- a/httemplate/view/svc_forward.cgi +++ b/httemplate/view/svc_forward.cgi @@ -50,6 +50,9 @@ </TABLE> <BR> + +<% include('elements/svc_export_settings.html', $svc_forward) %> + <% joblisting({'svcnum'=>$svcnum}, 1) %> <% include('/elements/footer.html') %> |