% my $n = 0;
-% foreach my $type ( ref($config_item->type) ? @{$config_item->type} : $config_item->type ) {
+% foreach my $type (@types) {
% if ( $type eq '' ) {
no type
+% } elsif ( $type eq 'image' ) {
+
+ <% $conf->exists($key, $agentnum)
+ ? 'Current image '.
+ ' '
+ : ''
+ %>
+
+
+ New image filename ">
+
% } elsif ( $type eq 'binary' ) {
Filename ">
% } elsif ( $type eq 'textarea' ) {
-
+
% } elsif ( $type eq 'checkbox' ) {
@@ -54,7 +71,7 @@ Setting <% $key %>
% } elsif ( $type eq 'text' ) {
- " type="text" value="<% $conf->exists($key, $agentnum) ? $conf->config($key, $agentnum) : '' %>">
+ " type="text" value="<% $conf->exists($key, $agentnum) ? $conf->config($key, $agentnum) : '' |h %>">
% } elsif ( $type eq 'select' || $type eq 'selectmultiple' ) {
@@ -67,11 +84,9 @@ Setting <% $key %>
% '' => '', map { $_ => $_ } @{ $config_item->select_enum };
% } elsif ( $config_item->select_hash ) {
% if ( ref($config_item->select_hash) eq 'ARRAY' ) {
-% tie %hash, 'Tie::IxHash',
-% '' => '', @{ $config_item->select_hash };
+% tie %hash, 'Tie::IxHash', '' => '', @{ $config_item->select_hash };
% } else {
-% tie %hash, 'Tie::IxHash',
-% '' => '', %{ $config_item->select_hash };
+% tie %hash, 'Tie::IxHash', '' => '', %{ $config_item->select_hash };
% }
% } else {
% %hash = ( '' => 'WARNING: neither select_enum nor select_hash specified in Conf.pm for configuration option "'. $key. '"' );
@@ -252,15 +267,35 @@ Setting <% $key %>
| (this.form)"> |