} elsif ($user->{menustyle} eq "neu") {
$form->{callback} =
"menunew.pl?login=$form->{login}&password=$form->{password}&action=display";
+ } elsif ($user->{menustyle} eq "xml") {
+ $form->{callback} =
+ "menuXML.pl?login=$form->{login}&password=$form->{password}&action=display";
} else {
$form->{callback} =
"menu.pl?login=$form->{login}&password=$form->{password}&action=display";
$myconfig{address} =~ s/\\n/<br>/g;
$myconfig{dbhost} = $locale->text('localhost') unless $myconfig{dbhost};
- map { $form->{$_} = $myconfig{$_} } qw(charset stylesheet);
+ $form->{stylesheet} = $myconfig{stylesheet};
$form->{title} = $locale->text('About');