All wobject collateral now moves using the moveCollateral method in the wobject superclass.

This commit is contained in:
JT Smith 2002-09-30 02:15:23 +00:00
parent 67d6329c22
commit 539f3bba59
4 changed files with 8 additions and 96 deletions

View file

@ -197,34 +197,12 @@ sub www_editLinkSave {
#-------------------------------------------------------------------
sub www_moveLinkDown {
my (@data, $thisSeq);
if (WebGUI::Privilege::canEditPage()) {
($thisSeq) = WebGUI::SQL->quickArray("select sequenceNumber from LinkList_link where linkId=$session{form}{lid}");
@data = WebGUI::SQL->quickArray("select linkId from LinkList_link where wobjectId=$session{form}{wid} and sequenceNumber=$thisSeq+1 group by wobjectId");
if ($data[0] ne "") {
WebGUI::SQL->write("update LinkList_link set sequenceNumber=sequenceNumber+1 where linkId=$session{form}{lid}");
WebGUI::SQL->write("update LinkList_link set sequenceNumber=sequenceNumber-1 where linkId=$data[0]");
}
return "";
} else {
return WebGUI::Privilege::insufficient();
}
$_[0]->moveCollateralDown("LinkList_link","linkId",$session{form}{lid});
}
#-------------------------------------------------------------------
sub www_moveLinkUp {
my (@data, $thisSeq);
if (WebGUI::Privilege::canEditPage()) {
($thisSeq) = WebGUI::SQL->quickArray("select sequenceNumber from LinkList_link where linkId=$session{form}{lid}");
@data = WebGUI::SQL->quickArray("select linkId from LinkList_link where wobjectId=$session{form}{wid} and sequenceNumber=$thisSeq-1 group by wobjectId");
if ($data[0] ne "") {
WebGUI::SQL->write("update LinkList_link set sequenceNumber=sequenceNumber-1 where linkId=$session{form}{lid}");
WebGUI::SQL->write("update LinkList_link set sequenceNumber=sequenceNumber+1 where linkId=$data[0]");
}
return "";
} else {
return WebGUI::Privilege::insufficient();
}
$_[0]->moveCollateralUp("LinkList_link","linkId",$session{form}{lid});
}
#-------------------------------------------------------------------