% if ( $FS::CurrentUser::CurrentUser->option('export_getsettings') ) { % 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 ) { <% $key |h %> <% $defaults->{$key} ? '' : '' %> <% $settings->{$key} |h %> <% $defaults->{$key} ? '' : '' %> % }
% } % } <%init> my $svc_x = shift;