oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

she works!

Browse source
This commit is contained in:
Patrick Donelan 2009-10-10 18:54:54 +11:00
parent 5982b2728c
commit 484760bef0
4 changed files with 60 additions and 526 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lib/WebGUI/Session.pm
View file

@ -465,13 +465,15 @@ sub open {
bless $self , $class;
# $self->{_request} = $request if (defined $request);
if ($request && $request->isa('WebGUI::Session::Plack')) {
# Use our WebGUI::Session::Plack object that is supposed to do everything Apache2::* can
$self->{_request} = $request;
} else {
# Use WebGUI::Session::Request to wrap Apache2::* calls
require WebGUI::Session::Request;
$self->{_request} = WebGUI::Session::Request->new( r => $request, session => $self );
if ($request) {
if ($request->isa('WebGUI::Session::Plack')) {
# Use our WebGUI::Session::Plack object that is supposed to do everything Apache2::* can
$self->{_request} = $request;
} else {
# Use WebGUI::Session::Request to wrap Apache2::* calls
require WebGUI::Session::Request;
$self->{_request} = WebGUI::Session::Request->new( r => $request, session => $self );
}
}
my $sessionId = shift || $self->http->getCookies->{$config->getCookieName} || $self->id->generate;