Revision aa2bdd23
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| SL/Dispatcher.pm | ||
|---|---|---|
| 155 | 155 |
$::form->{titlebar} = "Lx-Office " . $::locale->text('Version') . " $::form->{version}";
|
| 156 | 156 |
::run($::auth->restore_session); |
| 157 | 157 |
|
| 158 |
} elsif ($action) {
|
|
| 158 |
} else {
|
|
| 159 | 159 |
# copy from am.pl routines |
| 160 | 160 |
my $session_result = $::auth->restore_session; |
| 161 | 161 |
|
| ... | ... | |
| 172 | 172 |
$::auth->create_or_refresh_session; |
| 173 | 173 |
delete $::form->{password};
|
| 174 | 174 |
|
| 175 |
map { $::form->{$_} = $::myconfig{$_} } qw(stylesheet charset)
|
|
| 176 |
unless $action eq 'save' && $::form->{type} eq 'preferences';
|
|
| 177 |
|
|
| 178 |
$::form->set_standard_title; |
|
| 179 |
::call_sub('::' . $::locale->findsub($action));
|
|
| 175 |
if ($action) {
|
|
| 176 |
map { $::form->{$_} = $::myconfig{$_} } qw(stylesheet charset)
|
|
| 177 |
unless $action eq 'save' && $::form->{type} eq 'preferences';
|
|
| 180 | 178 |
|
| 181 |
} else {
|
|
| 182 |
$::form->error($::locale->text('action= not defined!'));
|
|
| 179 |
$::form->set_standard_title; |
|
| 180 |
::call_sub('::' . $::locale->findsub($action));
|
|
| 181 |
} else {
|
|
| 182 |
$::form->error($::locale->text('action= not defined!'));
|
|
| 183 |
} |
|
| 183 | 184 |
} |
| 184 | 185 |
|
| 185 | 186 |
1; |
Auch abrufbar als: Unified diff
Session trotzdem refreshen, auch wenn "action" nicht definiert ist