When opening or duplicating Session objects, pass on any Apache2::Request object

stored in the current session.
This commit is contained in:
Colin Kuskie 2009-08-14 01:38:03 +00:00
parent c557949ef0
commit ed97fa1ecd
4 changed files with 5 additions and 3 deletions

View file

@ -221,7 +221,7 @@ sub exportAssetCollateral {
my $printSession = WebGUI::Session->open( my $printSession = WebGUI::Session->open(
$self->session->config->getWebguiRoot, $self->session->config->getWebguiRoot,
$self->session->config->getFilename, $self->session->config->getFilename,
undef, $self->session->request,
undef, undef,
$self->session->getId, $self->session->getId,
); );

View file

@ -232,7 +232,7 @@ sub exportAssetCollateral {
my $exportSession = WebGUI::Session->open( my $exportSession = WebGUI::Session->open(
$self->session->config->getWebguiRoot, $self->session->config->getWebguiRoot,
$self->session->config->getFilename, $self->session->config->getFilename,
undef, $self->session->request,
undef, undef,
$self->session->getId, $self->session->getId,
); );

View file

@ -267,6 +267,7 @@ sub exportAsHtml {
my $exportSession = WebGUI::Session->open( my $exportSession = WebGUI::Session->open(
$session->config->getWebguiRoot, $session->config->getWebguiRoot,
$session->config->getFilename, $session->config->getFilename,
$session->request,
); );
my $esGuard = Scope::Guard->new(sub { my $esGuard = Scope::Guard->new(sub {
$exportSession->var->end; $exportSession->var->end;
@ -502,6 +503,7 @@ sub exportGetDescendants {
$session = WebGUI::Session->open( $session = WebGUI::Session->open(
$session->config->getWebguiRoot, $session->config->getWebguiRoot,
$session->config->getFilename, $session->config->getFilename,
$session->request,
); );
$session->user( { userId => $user->userId } ); $session->user( { userId => $user->userId } );
$sGuard = Scope::Guard->new(sub { $sGuard = Scope::Guard->new(sub {

View file

@ -252,7 +252,7 @@ sub duplicate {
my $newSession = WebGUI::Session->open( my $newSession = WebGUI::Session->open(
$self->config->getWebguiRoot, $self->config->getWebguiRoot,
$self->config->getFilename, $self->config->getFilename,
undef, $self->request,
undef, undef,
$self->getId, $self->getId,
); );