summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--FS/FS/part_export/communigate_pro.pm17
-rwxr-xr-xhttemplate/view/svc_forward.cgi3
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') %>