fix copy tests being hard coded based on default home page content

plainblack · Jun 15, 2010 · 73319bf · 73319bf
1 parent dc4e481
commit 73319bf
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/t/AssetHelper/Copy/WithChildren.t b/t/AssetHelper/Copy/WithChildren.t
@@ -42,8 +42,8 @@ my $root = WebGUI::Asset->getRoot($session);
 
 $session->user({userId => 3});
 
-{ 
-
+{
+    my $toBeCopied = $home->getLineage( ['self', 'descendants'] );
     $output = WebGUI::AssetHelper::Copy::WithChildren->process($home);
     cmp_deeply(
         $output, 
@@ -54,7 +54,7 @@ $session->user({userId => 3});
     );
 
     my $clippies = $root->getLineage(["descendants"], {statesToInclude => [qw{clipboard clipboard-limbo}], returnObjects => 1,});
-    is @{ $clippies }, 10, '... only copied the asset to the clipboard with children';
+    is @{ $clippies }, @$toBeCopied, '... only copied the asset to the clipboard with children';
     addToCleanup(@{ $clippies });
 }
 

diff --git a/t/AssetHelper/Copy/WithDescendants.t b/t/AssetHelper/Copy/WithDescendants.t
@@ -42,8 +42,8 @@ my $root = WebGUI::Asset->getRoot($session);
 
 $session->user({userId => 3});
 
-{ 
-
+{
+    my $toBeCopied = $home->getLineage( ['self', 'descendants'] );
     $output = WebGUI::AssetHelper::Copy::WithDescendants->process($home);
     cmp_deeply(
         $output, 
@@ -54,7 +54,7 @@ $session->user({userId => 3});
     );
 
     my $clippies = $root->getLineage(["descendants"], {statesToInclude => [qw{clipboard clipboard-limbo}], returnObjects => 1,});
-    is @{ $clippies }, 27, '... only copied the asset to the clipboard with children';
+    is @{ $clippies }, @{ $toBeCopied }, '... only copied the asset to the clipboard with children';
     addToCleanup(@{ $clippies });
 }