don't delete SQLForm files during upgrade

This commit is contained in:
Graham Knop 2008-09-15 21:51:53 +00:00
parent 1e54cf0458
commit e2942b450e
2 changed files with 0 additions and 8 deletions

View file

@ -403,10 +403,6 @@ sub removeSqlForm {
foreach my $table (qw(SQLForm_fieldDefinitions SQLForm SQLForm_fieldTypes SQLForm_regexes)) {
$db->write("drop table $table");
}
unlink ( $webguiRoot . '/lib/WebGUI/Asset/Wobject/SQLForm.pm' );
unlink ( $webguiRoot . '/lib/WebGUI/Help/Asset_SQLForm.pm' );
unlink ( $webguiRoot . '/lib/WebGUI/i18n/English/Asset_SQLForm.pm' );
unlink ( $webguiRoot . '/t/Asset/Wobject/SQLForm.t' );
}
else {
print "\t\tThis site uses SQL Form, so we won't uninstall it.\n" unless $quiet;

View file

@ -267,10 +267,6 @@ sub removeSqlForm {
foreach my $table (qw(SQLForm_fieldDefinitions SQLForm SQLForm_fieldTypes SQLForm_regexes)) {
$db->write("drop table $table");
}
unlink ( $webguiRoot . '/lib/WebGUI/Asset/Wobject/SQLForm.pm' );
unlink ( $webguiRoot . '/lib/WebGUI/Help/Asset_SQLForm.pm' );
unlink ( $webguiRoot . '/lib/WebGUI/i18n/English/Asset_SQLForm.pm' );
unlink ( $webguiRoot . '/t/Asset/Wobject/SQLForm.t' );
}
else {
print "\t\tThis site uses SQL Form, so we won't uninstall it.\n" unless $quiet;