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

migrating datetime api for session

Browse source
This commit is contained in:
JT Smith 2006-01-10 17:06:41 +00:00
parent c4354c1ff1
commit 9520b4ce48
52 changed files with 435 additions and 332 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Cache/FileCache.pm
View file

@ -111,7 +111,7 @@ sub get {
if (-e $folder."/expires" && -e $folder."/cache" && open(FILE,"<".$folder."/expires")) {
my $expires = <FILE>;
close(FILE);
return undef if ($expires < time());
return undef if ($expires <$self->session->datetime->time());
my $value;
eval {$value = retrieve($folder."/cache")};
if (ref $value eq "SCALAR") {
@ -177,7 +177,7 @@ sub getNamespaceSize {
if (open(FILE,"<".$dir."/expires")) {
my $expires = <FILE>;
close(FILE);
if ($expires < time()+$expiresModifier) {
if ($expires <$self->session->datetime->time()+$expiresModifier) {
rmtree($dir);
} else {
$self->session->stow->set("cacheSize", $self->session->stow->get("cacheSize") + -s $dir.'cache');
@ -256,7 +256,7 @@ sub set {
}
nstore($value, $path."/cache");
open(FILE,">".$path."/expires");
print FILE time()+$ttl;
print FILE$self->session->datetime->time()+$ttl;
close(FILE);
umask($oldumask);
}