From d37bf74175c0a8f5618df8d0b9d97edcd666a7c9 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 26 Jan 2007 19:20:24 +0000
Subject: [PATCH] passing ref to addChild overwrites self in sub duplicate

---
 lib/WebGUI/Asset/Wobject/Calendar.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Asset/Wobject/Calendar.pm b/lib/WebGUI/Asset/Wobject/Calendar.pm
index 7b6476a78..ccc253bfa 100644
--- a/lib/WebGUI/Asset/Wobject/Calendar.pm
+++ b/lib/WebGUI/Asset/Wobject/Calendar.pm
@@ -385,9 +385,9 @@ sub duplicate
 		});
 	
 	
-	for my $event (@events)
-	{
-		$newAsset->addChild($event->get);
+	for my $event (@events) {
+		my %eventProperties = %{ $event->get() };
+		$newAsset->addChild(\%eventProperties);
 	}
 	
 	return $newAsset;