X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDispatcher.pm;h=98c93d4f4092ed68eb3493f9fc471bff1fa88830;hb=738c240ad3a167dd3013ef01f0892b5589fd7d9a;hp=8bd296804c3ea087e6d47728034c0e9593448fd2;hpb=9ea6d163fb30b697f41282af0fab30b3b30438ec;p=kivitendo-erp.git diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm index 8bd296804..98c93d4f4 100644 --- a/SL/Dispatcher.pm +++ b/SL/Dispatcher.pm @@ -155,7 +155,7 @@ sub handle_request { $::form->{titlebar} = "Lx-Office " . $::locale->text('Version') . " $::form->{version}"; ::run($::auth->restore_session); - } elsif ($action) { + } else { # copy from am.pl routines my $session_result = $::auth->restore_session; @@ -172,14 +172,15 @@ sub handle_request { $::auth->create_or_refresh_session; delete $::form->{password}; - map { $::form->{$_} = $::myconfig{$_} } qw(stylesheet charset) - unless $action eq 'save' && $::form->{type} eq 'preferences'; - - $::form->set_standard_title; - ::call_sub('::' . $::locale->findsub($action)); + if ($action) { + map { $::form->{$_} = $::myconfig{$_} } qw(stylesheet charset) + unless $action eq 'save' && $::form->{type} eq 'preferences'; - } else { - $::form->error($::locale->text('action= not defined!')); + $::form->set_standard_title; + ::call_sub('::' . $::locale->findsub($action)); + } else { + $::form->error($::locale->text('action= not defined!')); + } } 1;