Missing session variables in Operation subroutines.
Forward port of Form/File,Image big fixes.
This commit is contained in:
parent
d35d57e1b8
commit
8639f53783
6 changed files with 72 additions and 50 deletions
|
|
@ -132,9 +132,9 @@ sub www_editProfile {
|
|||
sub www_editProfileSave {
|
||||
my $session = shift;
|
||||
my ($profile, $fieldName, $error, $u, $warning);
|
||||
return WebGUI::Operation::Auth::www_auth("init") if ($session->user->userId eq '1');
|
||||
return WebGUI::Operation::Auth::www_auth($session, "init") if ($session->user->userId eq '1');
|
||||
|
||||
($profile, $error, $warning) = validateProfileData();
|
||||
($profile, $error, $warning) = validateProfileData($session);
|
||||
$error .= $warning;
|
||||
|
||||
return www_editProfile('<ul>'.$error.'</ul>') if($error ne "");
|
||||
|
|
@ -144,7 +144,7 @@ sub www_editProfileSave {
|
|||
$u->profileField($fieldName,$profile->{$fieldName});
|
||||
}
|
||||
$session->user({user=>$u});
|
||||
return WebGUI::Operation::Auth::www_auth();
|
||||
return WebGUI::Operation::Auth::www_auth($session);
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
|
|
|||
|
|
@ -77,6 +77,7 @@ sub secureEval {
|
|||
my %trusted = (
|
||||
'WebGUI::International::get' => sub {$i18n->get(@_)},
|
||||
'WebGUI::International::getLanguages' => sub { $i18n->getLanguages(@_) },
|
||||
'WebGUI::DateTime::epochToHuman' => sub { $session->datetime->epochToHuman(@_) },
|
||||
'$session->datetime->epochToHuman' => sub { $session->datetime->epochToHuman(@_) },
|
||||
'WebGUI::Icon::getToolbarOptions' => sub { $session->icon->getToolbarOptions() },
|
||||
);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue