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

Some coverage tests for setRank. Added tests and a new folder

Browse source 
for getDescendantCount.
Pushed the reversal of order back into getLineage.  WGBP indentation.
This commit is contained in:
Colin Kuskie 2007-04-15 03:41:38 +00:00
parent 483daf6671
commit 450aab40a0
2 changed files with 52 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

20
lib/WebGUI/AssetLineage.pm
View file

@ -613,15 +613,15 @@ Lineage string.
sub newByLineage {
my $class = shift;
my $session = shift;
my $lineage = shift;
my $lineage = shift;
my $assetLineage = $session->stow->get("assetLineage");
my $id = $assetLineage->{$lineage}{id};
$class = $assetLineage->{$lineage}{class};
unless ($id && $class) {
($id,$class) = $session->db->quickArray("select assetId, className from asset where lineage=".$session->db->quote($lineage));
$assetLineage->{$lineage}{id} = $id;
$assetLineage->{$lineage}{class} = $class;
$session->stow->set("assetLineage",$assetLineage);
unless ($id && $class) {
($id,$class) = $session->db->quickArray("select assetId, className from asset where lineage=".$session->db->quote($lineage));
$assetLineage->{$lineage}{id} = $id;
$assetLineage->{$lineage}{class} = $class;
$session->stow->set("assetLineage",$assetLineage);
}
return WebGUI::Asset->new($session, $id, $class);
}
@ -704,11 +704,11 @@ sub setRank {
my $currentRank = $self->getRank;
return 1 if ($newRank == $currentRank); # do nothing if we're moving to ourself
my $parentLineage = $self->getParentLineage;
my $siblings = $self->getLineage(["siblings"],{returnObjects=>1});
my $reverse = ($newRank < $currentRank) ? 1 : 0;
my $siblings = $self->getLineage(["siblings"],{returnObjects=>1, invertTree=>$reverse});
my $temp = substr($self->session->id->generate(),0,6);
if ($newRank < $currentRank) { # have to do the ordering in reverse when the new rank is above the old rank
@{$siblings} = reverse @{$siblings};
}
my $previous = $self->get("lineage");
$self->session->db->beginTransaction;
$self->cascadeLineage($temp);