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

collect all code that deletes files in one place. Do not call it yet

Browse source
This commit is contained in:
Colin Kuskie 2008-05-09 17:13:28 +00:00
parent 3692818514
commit 62ab00480b
1 changed files with 37 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -18,6 +18,7 @@ use WebGUI::Asset::Sku::Product;
use WebGUI::Workflow; use WebGUI::Workflow;
use File::Find; use File::Find;
use File::Spec; use File::Spec;
use File::Path;
use JSON; use JSON;
my $toVersion = '7.5.11'; my $toVersion = '7.5.11';
@ -774,7 +775,6 @@ EOSQL1
$session->config->deleteFromArray('assets', 'WebGUI::Asset::Wobject::Product'); $session->config->deleteFromArray('assets', 'WebGUI::Asset::Wobject::Product');
$session->config->addToArray('assets', 'WebGUI::Asset::Sku::Product'); $session->config->addToArray('assets', 'WebGUI::Asset::Sku::Product');
unlink '../../lib/WebGUI/Asset/Wobject/Product.pm';
return; return;
} }
@ -853,20 +853,45 @@ sub mergeProductsWithCommerce {
$session->db->write('drop table productParameters'); $session->db->write('drop table productParameters');
$session->db->write('drop table productParameterOptions'); $session->db->write('drop table productParameterOptions');
$session->db->write('drop table productVariants'); $session->db->write('drop table productVariants');
##Remove old code
#unlink '../../lib/WebGUI/Product.pm';
#unlink '../../lib/WebGUI/Operation/ProductManager.pm';
#unlink '../../lib/WebGUI/Macro/Product.pm';
##Disable the Product macro in the config file. You can't use the convenience method
#deleteFromHash since the macro name is in the value, not the key.
#my %macros = %{ $session->config->get('macros') };
#foreach (my ($key, $value) = each %macros) {
# delete $macros{$key} if $value eq 'Product';
#}
#$session->config->set('macros', \%macros);
return 1; return 1;
} }
#-------------------------------------------------
sub removeOldCommerceCode {
my $session = shift;
unlink '../../lib/WebGUI/Asset/Wobject/Product.pm';
rmtree '../../lib/WebGUI/Commerce.pm';
unlink '../../lib/WebGUI/Product.pm';
unlink '../../lib/WebGUI/Subscription.pm';
unlink '../../lib/WebGUI/Macro/Product.pm';
unlink '../../lib/WebGUI/Help/Macro_Product.pm';
unlink '../../lib/WebGUI/i18n/English/Macro_Product.pm';
unlink '../../lib/WebGUI/Operation/ProductManager.pm';
unlink '../../lib/WebGUI/Help/ProductManager.pm';
unlink '../../lib/WebGUI/i18n/English/ProductManager.pm';
unlink '../../lib/WebGUI/Operation/Commerce.pm';
unlink '../../lib/WebGUI/Help/Commerce.pm';
unlink '../../lib/WebGUI/i18n/English/Commerce.pm';
unlink '../../lib/WebGUI/Operation/Subscription.pm';
unlink '../../lib/WebGUI/Help/Subscription.pm';
unlink '../../lib/WebGUI/i18n/English/Subscription.pm';
#Disable the Product macro in the config file. You can't use the convenience method
#deleteFromHash since the macro name is in the value, not the key.
my %macros = %{ $session->config->get('macros') };
foreach (my ($key, $value) = each %macros) {
delete $macros{$key} if $value eq 'Product';
}
$session->config->set('macros', \%macros);
return 1;
}
#------------------------------------------------- #-------------------------------------------------
sub updateUsersOfProductMacro { sub updateUsersOfProductMacro {
my $session = shift; my $session = shift;