fixed a bug in the new oo page tree stuff

removed a bunch of crap that somehow got readded
added new stuff for autogroups
got rid of magic groups
This commit is contained in:
JT Smith 2004-02-04 02:36:12 +00:00
parent bd4bf924f2
commit 0cb06e0e17
18 changed files with 102 additions and 1548 deletions

View file

@ -302,7 +302,7 @@ sub www_listGroups {
$output = helpIcon(10);
$output .= '<h1>'.WebGUI::International::get(89).'</h1>';
$sth = WebGUI::SQL->read("select groupId,groupName,description from groups
where groupId<>1 and groupId<>2 and groupId<>7 order by groupName");
where isEditable=1 order by groupName");
while (@data = $sth->array) {
$row[$i] = '<tr>';
$row[$i] .= '<td valign="top" class="tableData"><a href="'

View file

@ -55,15 +55,15 @@ sub _recursivelyChangeProperties {
$page->walk_down({
callback => sub {
if (WebGUI::Privilege::canEditPage($_[0]->get('pageId'))) {
$_[0]->setWithoutRecache({
if (WebGUI::Privilege::canEditPage($page->get('pageId'))) {
$page->setWithoutRecache({
startDate => WebGUI::FormProcessor::dateTime("startDate"),
endDate => WebGUI::FormProcessor::dateTime("endDate"),
ownerId => $session{form}{ownerId},
groupIdView => $session{form}{groupIdView},
groupIdEdit => $session{form}{groupIdEdit}
}) if ($session{form}{recursePrivs});
$_[0]->setWithoutRecache({
$page->setWithoutRecache({
styleId => $session{form}{styleId}
}) if ($session{form}{recurseStyle});
}
@ -74,7 +74,7 @@ sub _recursivelyChangeProperties {
WebGUI::Page->recachePageTree;
}
-------------------------------------------------------------------
#-------------------------------------------------------------------
sub _reorderPages {
my ($sth, $i, $pid);
$sth = WebGUI::SQL->read("select pageId from page where parentId=$_[0] order by sequenceNumber");