From ab4e801bfe206972665c000e35b5c541089b3df5 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Thu, 13 Apr 2006 21:40:40 +0000
Subject: [PATCH] got the tree following to work

---
 lib/WebGUI/AssetPackage.pm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/lib/WebGUI/AssetPackage.pm b/lib/WebGUI/AssetPackage.pm
index bc274b19c..8c81d5da5 100644
--- a/lib/WebGUI/AssetPackage.pm
+++ b/lib/WebGUI/AssetPackage.pm
@@ -136,9 +136,9 @@ sub importAssetData {
 	} else {
 		$asset = WebGUI::Asset->new($self->session, $id, $class);
 		if (defined $asset) { # create a new revision of an existing asset
-			$asset->addRevision($data->{properties}, $version);
+			$asset = $asset->addRevision($data->{properties}, $version);
 		} else { # add an entirely new asset
-			$self->addChild($data->{properties}, $id, $version);
+			$asset = $self->addChild($data->{properties}, $id, $version);
 		}
 	}
 	return $asset;
@@ -172,8 +172,9 @@ sub importPackage {
 			my $assetStorage = WebGUI::Storage->get($self->session, $storageId);
 			$decompressed->untar($storageId.".storage", $assetStorage);
 		}
-		my $asset = $assets{$data->{parentId}} || $self;
-		$assets{$data->{assetId}} = $asset->importAssetData($data);
+		my $asset = $assets{$data->{properties}{parentId}} || $self;
+		my $newAsset = $asset->importAssetData($data);
+		$assets{$newAsset->getId} = $newAsset;
 	}
 	return undef;
 }