Session/Http: bad package name
Session/Var: bad API, getCookie('key') vs getCookies->{'key'}
Session.pm: used object variable vs method.
This commit is contained in:
parent
89f60a8e03
commit
68c3075ccb
3 changed files with 3 additions and 3 deletions
|
|
@ -537,7 +537,7 @@ sub user {
|
|||
delete $self->{_stow};
|
||||
$self->{_user} = $option->{user} || WebGUI::User->new($self, $self->{_var}{userId});
|
||||
} elsif (!exists $self->{_user}) {
|
||||
$self->{_user} = WebGUI::User->new($self, $self->{_var}{userId});
|
||||
$self->{_user} = WebGUI::User->new($self, $self->var->get('userId'));
|
||||
}
|
||||
$self->{_request}->user($self->{_user}->username) if ($self->{_request});
|
||||
return $self->{_user};
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
package WebGUI::Session::HTTP;
|
||||
package WebGUI::Session::Http;
|
||||
|
||||
=head1 LEGAL
|
||||
|
||||
|
|
|
|||
|
|
@ -133,7 +133,7 @@ sub new {
|
|||
my $class = shift;
|
||||
my $session = shift;
|
||||
my $self = {_session=>$session}, $class;
|
||||
my $sessionId = shift || $self->http->getCookie("wgSession");
|
||||
my $sessionId = shift || $session->http->getCookies->{"wgSession"};
|
||||
if ($sessionId eq "") {
|
||||
$self->start(1);
|
||||
} else {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue