fixing shoddy craftsmanship

This commit is contained in:
JT Smith 2005-12-08 05:10:32 +00:00
parent 655a2ff065
commit 1854f6dbeb

View file

@ -67,8 +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::SQL->write("delete from asset where assetId=.quote($assetId)");
WebGUI::SQL->write("delete from assetData where assetId=.quote($assetId)");
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`");