added page caching

This commit is contained in:
JT Smith 2003-06-22 20:18:58 +00:00
parent 5567669b4f
commit 1eb72cc633
6 changed files with 74 additions and 25 deletions

View file

@ -109,21 +109,7 @@ sub www_editContentSettings {
$f->integer("textAreaRows",WebGUI::International::get(463),$session{setting}{textAreaRows});
$f->integer("textAreaCols",WebGUI::International::get(464),$session{setting}{textAreaCols});
$f->integer("textBoxSize",WebGUI::International::get(465),$session{setting}{textBoxSize});
my @data = WebGUI::DateTime::secondsToInterval($session{setting}{cachePages});
$f->interval(
-name=>"cachePages",
-label=>WebGUI::International::get(895),
-intervalValue=>$data[0],
-unitsValue=>$data[1]
);
@data = WebGUI::DateTime::secondsToInterval($session{setting}{cachePagesVisitor});
$f->interval(
-name=>"cachePagesVisitor",
-label=>WebGUI::International::get(896),
-intervalValue=>$data[0],
-unitsValue=>$data[1]
);
$f->yesNo("wobjectPrivileges",WebGUI::International::get(979),$session{setting}{wobjectPrivileges});
$f->yesNo("wobjectPrivileges",WebGUI::International::get(979),$session{setting}{wobjectPrivileges});
$f->submit;
$output .= $f->print;
return _submenu($output);