Code cleanup.

This commit is contained in:
JT Smith 2002-05-30 00:34:15 +00:00
parent 199bb625e9
commit 70af188fbb

View file

@ -23,14 +23,18 @@ use WebGUI::URL;
use WebGUI::Utility; use WebGUI::Utility;
our @ISA = qw(Exporter); our @ISA = qw(Exporter);
our @EXPORT = qw(&www_viewPageTree &www_movePageUp &www_movePageDown &www_cutPage &www_deletePage &www_deletePageConfirm &www_editPage &www_editPageSave &www_pastePage); our @EXPORT = qw(&www_viewPageTree &www_movePageUp &www_movePageDown &www_cutPage &www_deletePage &www_deletePageConfirm
&www_editPage &www_editPageSave &www_pastePage);
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub _recursivelyChangePrivileges { sub _recursivelyChangePrivileges {
my ($sth, $pageId); my ($sth, $pageId);
$sth = WebGUI::SQL->read("select pageId from page where parentId=$_[0]"); $sth = WebGUI::SQL->read("select pageId from page where parentId=$_[0]");
while (($pageId) = $sth->array) { while (($pageId) = $sth->array) {
WebGUI::SQL->write("update page set ownerId=$session{form}{ownerId}, ownerView=$session{form}{ownerView}, ownerEdit=$session{form}{ownerEdit}, groupId='$session{form}{groupId}', groupView=$session{form}{groupView}, groupEdit=$session{form}{groupEdit}, worldView=$session{form}{worldView}, worldEdit=$session{form}{worldEdit} where pageId=$pageId"); WebGUI::SQL->write("update page set ownerId=$session{form}{ownerId}, ownerView=$session{form}{ownerView},
ownerEdit=$session{form}{ownerEdit}, groupId='$session{form}{groupId}', groupView=$session{form}{groupView},
groupEdit=$session{form}{groupEdit}, worldView=$session{form}{worldView}, worldEdit=$session{form}{worldEdit}
where pageId=$pageId");
_recursivelyChangePrivileges($pageId); _recursivelyChangePrivileges($pageId);
} }
$sth->finish; $sth->finish;
@ -158,8 +162,6 @@ sub www_editPage {
$f->text("title",WebGUI::International::get(99),$page{title}); $f->text("title",WebGUI::International::get(99),$page{title});
$f->text("menuTitle",WebGUI::International::get(411),$page{menuTitle}); $f->text("menuTitle",WebGUI::International::get(411),$page{menuTitle});
$f->text("urlizedTitle",WebGUI::International::get(104),$page{urlizedTitle}); $f->text("urlizedTitle",WebGUI::International::get(104),$page{urlizedTitle});
#%hash = WebGUI::Template::getList();
#$f->select("templateId",\%hash,WebGUI::International::get(356),[$page{templateId}]);
$f->readOnly(WebGUI::Template::selectTemplate($page{templateId}),WebGUI::International::get(356)); $f->readOnly(WebGUI::Template::selectTemplate($page{templateId}),WebGUI::International::get(356));
$f->textarea("synopsis",WebGUI::International::get(412),$page{synopsis}); $f->textarea("synopsis",WebGUI::International::get(412),$page{synopsis});
$f->textarea("metatags",WebGUI::International::get(100),$page{metaTags}); $f->textarea("metatags",WebGUI::International::get(100),$page{metaTags});