From 655a2ff0654368840f7aa84942ec4ce91056faa1 Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Thu, 8 Dec 2005 04:25:55 +0000
Subject: [PATCH] fixing upgrade file....

---
 docs/upgrades/upgrade_6.8.0-6.8.1.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/docs/upgrades/upgrade_6.8.0-6.8.1.pl b/docs/upgrades/upgrade_6.8.0-6.8.1.pl
index 3620511f5..ef9bcb965 100644
--- a/docs/upgrades/upgrade_6.8.0-6.8.1.pl
+++ b/docs/upgrades/upgrade_6.8.0-6.8.1.pl
@@ -67,7 +67,8 @@ sub convertDashboardPrefs {
 	#purge all Fields.
 	my $a = WebGUI::SQL->read("select assetId from asset where className='WebGUI::Asset::Field'");
 	while (my ($assetId) = $a->array) {
-		WebGUI::Asset::Field->new($assetId)->purge;
+		WebGUI::SQL->write("delete from asset where assetId=.quote($assetId)");
+		WebGUI::SQL->write("delete from assetData where assetId=.quote($assetId)");
 	}
 	unlink("../../lib/WebGUI/Asset/Field.pm");
 	WebGUI::SQL->write("DROP TABLE `wgField`");