fixing upgrade file....

This commit is contained in:
Matthew Wilson 2005-12-08 04:25:55 +00:00
parent 4565e36d65
commit 655a2ff065

View file

@ -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`");