oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Changed several hardcoded '../..' for $webguiRoot in file deletions

Browse source 
with unlink and rmtree on upgrade scripts.
This commit is contained in:
Ernesto Hernández-Novich 2008-06-13 21:37:08 +00:00
parent 5c33de7f20
commit 8b2eee05b7
2 changed files with 44 additions and 44 deletions
Download patch file Download diff file Expand all files Collapse all files

2
docs/upgrades/upgrade_7.4.21-7.5.0.pl
View file

@ -74,7 +74,7 @@ sub addUrlAndContentHandlers {
"WebGUI::Content::NotFound" "WebGUI::Content::NotFound"
]); ]);
$config->delete("passthruUrls"); $config->delete("passthruUrls");
unlink "../../lib/WebGUI/Setup.pm"; unlink ($webguiRoot . "/lib/WebGUI/Setup.pm");
print "DONE!\n" unless $quiet; print "DONE!\n" unless $quiet;
} }

86
docs/upgrades/upgrade_7.5.10-7.5.11.pl
View file

@ -266,10 +266,10 @@ sub removeSqlForm {
foreach my $table (qw(SQLForm_fieldDefinitions SQLForm SQLForm_fieldTypes SQLForm_regexes)) { foreach my $table (qw(SQLForm_fieldDefinitions SQLForm SQLForm_fieldTypes SQLForm_regexes)) {
$db->write("drop table $table"); $db->write("drop table $table");
} }
unlink '../../lib/WebGUI/Asset/Wobject/SQLForm.pm'; unlink ( $webguiRoot . '/lib/WebGUI/Asset/Wobject/SQLForm.pm' );
unlink '../../lib/WebGUI/Help/Asset_SQLForm.pm'; unlink ( $webguiRoot . '/lib/WebGUI/Help/Asset_SQLForm.pm' );
unlink '../../lib/WebGUI/i18n/English/Asset_SQLForm.pm'; unlink ( $webguiRoot . '/lib/WebGUI/i18n/English/Asset_SQLForm.pm' );
unlink '../../t/Asset/Wobject/SQLForm.t'; unlink ( $webguiRoot . '/t/Asset/Wobject/SQLForm.t' );
} }
else { else {
print "\t\tThis site uses SQL Form, so we won't uninstall it.\n" unless $quiet; print "\t\tThis site uses SQL Form, so we won't uninstall it.\n" unless $quiet;
@ -468,7 +468,7 @@ sub upgradeEMS {
print "\tUpgrading Event Manager\n" unless ($quiet); print "\tUpgrading Event Manager\n" unless ($quiet);
my $db = $session->db; my $db = $session->db;
print "\t\tDeleting unused files in the extras directory.\n" unless ($quiet); print "\t\tDeleting unused files in the extras directory.\n" unless ($quiet);
rmtree '../../www/extras/wobject/EventManagementSystem'; rmtree ( $webguiRoot . '/www/extras/wobject/EventManagementSystem' );
print "\t\tGetting rid of old templates.\n" unless ($quiet); print "\t\tGetting rid of old templates.\n" unless ($quiet);
foreach my $namespace (qw(EventManagementSystem EventManagementSystem_checkout EventManagementSystem_managePurchas EventManagementSystem_product EventManagementSystem_viewPurchase EventManagementSystem_search emsbadgeprint emsticketprint)) { foreach my $namespace (qw(EventManagementSystem EventManagementSystem_checkout EventManagementSystem_managePurchas EventManagementSystem_product EventManagementSystem_viewPurchase EventManagementSystem_search emsbadgeprint emsticketprint)) {
@ -1261,51 +1261,51 @@ sub removeOldCommerceCode {
$setting->remove('groupIdAdminSubscription'); $setting->remove('groupIdAdminSubscription');
$setting->remove('groupIdAdminTransactionLog'); $setting->remove('groupIdAdminTransactionLog');
my $config = $session->config; my $config = $session->config;
unlink '../../lib/WebGUI/Asset/Wobject/Product.pm'; unlink ($webguiRoot . '/lib/WebGUI/Asset/Wobject/Product.pm') ;
rmtree '../../lib/WebGUI/Commerce'; rmtree ($webguiRoot . '/lib/WebGUI/Commerce') ;
unlink '../../lib/WebGUI/Commerce.pm'; unlink ($webguiRoot . '/lib/WebGUI/Commerce.pm') ;
unlink '../../lib/WebGUI/Product.pm'; unlink ($webguiRoot . '/lib/WebGUI/Product.pm') ;
unlink '../../lib/WebGUI/Subscription.pm'; unlink ($webguiRoot . '/lib/WebGUI/Subscription.pm') ;
unlink '../../lib/WebGUI/Operation/TransactionLog.pm'; unlink ($webguiRoot . '/lib/WebGUI/Operation/TransactionLog.pm') ;
unlink '../../lib/WebGUI/i18n/English/CommercePaymentCash.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/CommercePaymentCash.pm') ;
unlink '../../lib/WebGUI/i18n/English/CommercePaymentCheck.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/CommercePaymentCheck.pm') ;
unlink '../../lib/WebGUI/i18n/English/CommercePaymentITransact.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/CommercePaymentITransact.pm') ;
unlink '../../lib/WebGUI/i18n/English/CommerceShippingByPrice.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/CommerceShippingByPrice.pm') ;
unlink '../../lib/WebGUI/i18n/English/CommerceShippingByWeight.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/CommerceShippingByWeight.pm') ;
unlink '../../lib/WebGUI/i18n/English/CommerceShippingPerTransaction.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/CommerceShippingPerTransaction.pm') ;
unlink '../../lib/WebGUI/i18n/English/Workflow_Activity_CacheEMSPrereqs.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/Workflow_Activity_CacheEMSPrereqs.pm') ;
unlink '../../lib/WebGUI/i18n/English/Workflow_Activity_ProcessRecurringPayments.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/Workflow_Activity_ProcessRecurringPayments.pm') ;
unlink '../../lib/WebGUI/Workflow/Activity/ProcessRecurringPayments.pm'; unlink ($webguiRoot . '/lib/WebGUI/Workflow/Activity/ProcessRecurringPayments.pm') ;
$session->db->write("delete from WorkflowActivity where className='WebGUI::Workflow::Activity::ProcessRecurringPayments'"); $session->db->write("delete from WorkflowActivity where className='WebGUI::Workflow::Activity::ProcessRecurringPayments'");
unlink '../../lib/WebGUI/Macro/Product.pm'; unlink ($webguiRoot . '/lib/WebGUI/Macro/Product.pm') ;
unlink '../../lib/WebGUI/Help/Macro_Product.pm'; unlink ($webguiRoot . '/lib/WebGUI/Help/Macro_Product.pm') ;
unlink '../../lib/WebGUI/i18n/English/Macro_Product.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/Macro_Product.pm') ;
unlink '../../t/Macro/Product.t'; unlink ($webguiRoot . '/t/Macro/Product.t') ;
unlink '../../lib/WebGUI/Macro/SubscriptionItem.pm'; unlink ($webguiRoot . '/lib/WebGUI/Macro/SubscriptionItem.pm') ;
unlink '../../lib/WebGUI/Macro/SubscriptionItemPurchaseUrl.pm'; unlink ($webguiRoot . '/lib/WebGUI/Macro/SubscriptionItemPurchaseUrl.pm') ;
unlink '../../lib/WebGUI/Help/Macro_SubscriptionItem.pm'; unlink ($webguiRoot . '/lib/WebGUI/Help/Macro_SubscriptionItem.pm') ;
unlink '../../lib/WebGUI/i18n/English/Macro_SubscriptionItem.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/Macro_SubscriptionItem.pm') ;
unlink '../../t/Macro/SubscriptionItem.t'; unlink ($webguiRoot . '/t/Macro/SubscriptionItem.t') ;
unlink '../../t/Macro/SubscriptionItemPurchaseUrl.t'; unlink ($webguiRoot . '/t/Macro/SubscriptionItemPurchaseUrl.t') ;
unlink '../../lib/WebGUI/Operation/ProductManager.pm'; unlink ($webguiRoot . '/lib/WebGUI/Operation/ProductManager.pm') ;
unlink '../../lib/WebGUI/Help/ProductManager.pm'; unlink ($webguiRoot . '/lib/WebGUI/Help/ProductManager.pm') ;
unlink '../../lib/WebGUI/i18n/English/ProductManager.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/ProductManager.pm') ;
unlink '../../lib/WebGUI/Operation/Commerce.pm'; unlink ($webguiRoot . '/lib/WebGUI/Operation/Commerce.pm') ;
unlink '../../lib/WebGUI/Help/Commerce.pm'; unlink ($webguiRoot . '/lib/WebGUI/Help/Commerce.pm') ;
unlink '../../lib/WebGUI/i18n/English/Commerce.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/Commerce.pm') ;
unlink '../../lib/WebGUI/Operation/Subscription.pm'; unlink ($webguiRoot . '/lib/WebGUI/Operation/Subscription.pm') ;
unlink '../../lib/WebGUI/Help/Subscription.pm'; unlink ($webguiRoot . '/lib/WebGUI/Help/Subscription.pm') ;
unlink '../../lib/WebGUI/i18n/English/Subscription.pm'; unlink ($webguiRoot . '/lib/WebGUI/i18n/English/Subscription.pm') ;
unlink '../../www/extras/adminConsole/subscriptions.gif'; unlink ($webguiRoot . '/www/extras/adminConsole/subscriptions.gif') ;
unlink '../../www/extras/adminConsole/small/subscriptions.gif'; unlink ($webguiRoot . '/www/extras/adminConsole/small/subscriptions.gif') ;
unlink '../../www/extras/adminConsole/productManager.gif'; unlink ($webguiRoot . '/www/extras/adminConsole/productManager.gif') ;
unlink '../../www/extras/adminConsole/small/productManager.gif'; unlink ($webguiRoot . '/www/extras/adminConsole/small/productManager.gif') ;
##Delete unused templates ##Delete unused templates
my $templates = $session->db->read("select distinct(assetId) from template where namespace like 'Commerce%'",[]); my $templates = $session->db->read("select distinct(assetId) from template where namespace like 'Commerce%'",[]);