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

a ton of $session fixes (thanks to Colin), and a new $session checker, that supposedly, shouldn't be needed now. It can be backed out, however, easily.

Browse source
This commit is contained in:
Matthew Wilson 2006-01-16 22:45:21 +00:00
parent 5fadc70eac
commit 09483e18c5
208 changed files with 505 additions and 533 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Storage.pm
View file

@ -326,7 +326,7 @@ A reference to the current session;
sub create {
my $class = shift;
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $id = $session->id->generate();
my $self = $class->get($session,$id);
$self->_makePath;
@ -348,7 +348,7 @@ A reference to the current session.
sub createTemp {
my $class = shift;
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $id = $session->id->generate();
$id =~ m/^(.{2})/;
my $self = {_session=>$session, _id => $id, _part1 => 'temp', _part2 => $1};
@ -409,7 +409,7 @@ The unique identifier for this file system storage location.
sub get {
my $class = shift;
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $id = shift;
return undef unless $id;
$id =~ m/^(.{2})(.{2})/;