summaryrefslogtreecommitdiff
path: root/httemplate/view/elements/svc_export_settings.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/view/elements/svc_export_settings.html')
-rw-r--r--httemplate/view/elements/svc_export_settings.html28
1 files changed, 28 insertions, 0 deletions
diff --git a/httemplate/view/elements/svc_export_settings.html b/httemplate/view/elements/svc_export_settings.html
new file mode 100644
index 000000000..026280546
--- /dev/null
+++ b/httemplate/view/elements/svc_export_settings.html
@@ -0,0 +1,28 @@
+% my ( $settings, $defaults ) = $svc_x->export_getsettings;
+% if ( keys %$settings ) {
+
+%# XXX a way to label this "Communigate pro settings".. just a config maybe
+ External settings
+ <% ntable('#cccccc',2) %>
+
+% foreach my $key ( keys %$settings ) {
+ <TR>
+ <TD ALIGN="right"><% $key |h %></TD>
+ <TD BGCOLOR="<% $defaults->{$key} ? '#eeeeee' : '#ffffff' %>">
+ <% $defaults->{$key} ? '<I>' : '<B>' %>
+ <% $settings->{$key} |h %>
+ <% $defaults->{$key} ? '</I>' : '</B>' %>
+ </TD>
+ </TR>
+% }
+
+ </TABLE>
+ <BR>
+
+% }
+
+<%init>
+
+my $svc_x = shift;
+
+</%init>