do 'change-user-lib.pl'; # acl_security_form(&options) # Output HTML for editing security options for the acl module sub acl_security_form { print " $text{'acl_lang'} \n"; printf " $text{'yes'}\n", $_[0]->{'lang'} ? 'checked' : ''; printf " $text{'no'}\n", $_[0]->{'lang'} ? '' : 'checked'; print "$text{'acl_theme'} \n"; printf " $text{'yes'}\n", $_[0]->{'theme'} ? 'checked' : ''; printf " $text{'no'} \n", $_[0]->{'theme'} ? '' : 'checked'; print " $text{'acl_pass'} \n"; printf " $text{'yes'}\n", $_[0]->{'pass'} ? 'checked' : ''; printf " $text{'no'} \n", $_[0]->{'pass'} ? '' : 'checked'; } # acl_security_save(&options) # Parse the form for security options for the acl module sub acl_security_save { $_[0]->{'lang'} = $in{'lang'}; $_[0]->{'theme'} = $in{'theme'}; $_[0]->{'pass'} = $in{'pass'}; }