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

removal of dumpSession.

Browse source
This commit is contained in:
Matthew Wilson 2006-01-26 05:39:16 +00:00
parent 7d1dfed519
commit 4a3121960f
199 changed files with 379 additions and 404 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; use WebGUI; WebGUI::dumpSession($session);
my $session = shift;
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; use WebGUI; WebGUI::dumpSession($session);
my $session = shift;
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; use WebGUI; WebGUI::dumpSession($session);
my $session = shift;
my $id = shift;
return undef unless $id;
$id =~ m/^(.{2})(.{2})/;