diff -up smeserver-password-1.0.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/passwordopt.pm.epoch smeserver-password-1.0.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/passwordopt.pm --- smeserver-password-1.0.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/passwordopt.pm.epoch 2013-06-22 20:22:44.000000000 -0400 +++ smeserver-password-1.0.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/passwordopt.pm 2013-06-22 20:51:22.000000000 -0400 @@ -171,7 +171,13 @@ $key->set_prop('PwdWarn', $q->param('Pwd $key->set_prop('LockAccount', $q->param('LockAccount')); $key->set_prop('DateReset', $q->param('DateReset')); -my @cusers = $q->param('PasswordAge'); +# this way something goes wrong when deselecting all one stays +#my @cusers = $q->param('PasswordAge'); +# workaround +use CGI; +my $cgi = CGI->new; +my @cusers = $cgi->param('PasswordAge'); + my %opt1 ; foreach (@cusers) { $opt1{$_}="on";