diff --git a/t/Macro/RootTitle.t b/t/Macro/RootTitle.t
index 43d922e11..2d1b37b75 100644
--- a/t/Macro/RootTitle.t
+++ b/t/Macro/RootTitle.t
@@ -33,7 +33,7 @@ $versionTag->set({name=>"Adding assets for RootTitle tests"});
 my %tag = ( tagId => $versionTag->getId, status => "pending" );
 addToCleanup($versionTag);
 
-my $root = WebGUI::Test->asset;
+my $root = WebGUI::Asset->getRoot($session);
 my %properties_A = (
 		className   => 'WebGUI::Asset::Snippet',
 		title       => 'Asset A',
@@ -118,6 +118,8 @@ my $asset_ = $root->addChild(\%properties__, $properties__{id});
 
 $versionTag->commit;
 
+WebGUI::Test->addToCleanup($assetZ, $asset_);
+
 my $origLineage = $asset_->lineage;
 my $newLineage = substr $origLineage, 0, length($origLineage)-1; 
 $session->db->write('update asset set lineage=? where assetId=?',[$newLineage, $asset_->getId]);