\n";
print " $text{'user_name'} | \n";
printf " | \n",
$user->{'name'};
foreach $g (@{$host->{'groups'}}) {
if (&indexof($user->{'name'}, @{$g->{'members'}}) >= 0) {
$group = $g;
last;
}
}
print " $text{'user_group'} | \n";
printf " %s (%s)\n",
$text{'user_leave'}, $group ? $group->{'name'} : $text{'user_nogroup2'};
printf " %s\n",
$text{'user_set'};
print " | \n";
print " $text{'user_pass'} | \n";
print " | \n";
@langs = &list_languages();
%langdesc = map { $_->{'lang'}, $_->{'desc'} } @langs;
print " $text{'user_lang'} | \n";
printf " %s (%s)\n",
$text{'user_leave'}, $user->{'lang'} ? $langdesc{$user->{'lang'}}
: $text{'user_default'};
printf " %s\n",
$text{'user_set'};
print " | \n";
%themedesc = map { $_->{'dir'}, $_->{'desc'} } @themes;
print " $text{'user_theme'} | \n";
printf " %s (%s)\n",
$text{'user_leave'},
$user->{'theme'} ? $themedesc{$user->{'theme'}} :
!defined($user->{'theme'}) ? $text{'user_default'} : $text{'user_themedef'};
printf " %s\n",
$text{'user_set'};
print " | \n";
print " $text{'user_notabs'} | \n";
print "",ui_radio("notabs", int($user->{'notabs'}),
[ [ 1, $text{'yes'} ],
[ 2, $text{'no'} ],
[ 0, $text{'default'} ] ])," | \n";
print " $text{'user_ips'} | \n";
print "\n";
print " $text{'user_leave'}\n";
if ($user->{'allow'}) {
print "($text{'user_allow2'} $user->{'allow'})\n";
}
elsif ($user->{'deny'}) {
print "($text{'user_deny2'} $user->{'deny'})\n";
}
else {
print "($text{'user_allowall'})\n";
}
print " | \n";
$mp = int((scalar(@mods)+2)/3);
@umods = $group ? @{$user->{'ownmods'}} : @{$user->{'modules'}};
map { $umods{$_}++ } @umods;
print " $text{'user_mods'} ",
"$text{'user_groupmods'} | \n";
print " ",
&text('user_mleave', scalar(@umods))," \n";
print " $text{'user_modsel'}\n";
print " $text{'user_modadd'}\n";
print " $text{'user_moddel'}\n";
print " \n";
print "\n";
print "\n";
print "\n";
print " \n";
print "$text{'user_sall'} \n";
print "$text{'user_snone'} \n";
print "$text{'user_sinvert'} \n";
print " | \n";
print " |