commerce bug fixes

This commit is contained in:
JT Smith 2008-06-12 16:05:01 +00:00
parent b57f289706
commit 60a6f97c48
3 changed files with 7 additions and 8 deletions

View file

@ -1229,7 +1229,6 @@ sub removeOldCommerceCode {
print "\tRemoving old commerce code.\n" unless ($quiet);
my $setting = $session->setting;
$setting->remove('groupIdAdminCommerce');
$setting->remove('groupIdAdminProductManager');
$setting->remove('groupIdAdminSubscription');
$setting->remove('groupIdAdminTransactionLog');
@ -1740,13 +1739,13 @@ sub migratePaymentPlugins {
$properties->{ receiptEmailTemplateId } = 'BMzuE91-XB8E-XGll1zpvA';
# Create paydriver instance
my $plugin = eval {
my $plugin =
WebGUI::Pluggable::instanciate("WebGUI::Shop::PayDriver::$namespace", 'create', [
$session,
$properties->{ label },
$properties->{ label } || $namespace || 'Credit Card',
$properties
])
};
;
# Print warning message for ITransact users that they must change their postback url
if ( $namespace eq 'ITransact' && $properties->{ vendorId } ) {

View file

@ -30,7 +30,7 @@ sub definition {
tie my %fields, 'Tie::IxHash';
push @{ $definition }, {
name => $i18n->echo('Cash'),
name => $i18n->get('label'),
properties => \%fields,
};

View file

@ -444,7 +444,7 @@ sub getButton {
sub getEditForm {
my $self = shift;
my $session = $self->session;
my $i18n = WebGUI::International->new($session, 'CommercePaymentITransact');
my $i18n = WebGUI::International->new($session, 'PayDriver_ITransact');
my $f = $self->SUPER::getEditForm( @_ );
$f->readOnly(
@ -484,7 +484,7 @@ sub processCredentials {
my $self = shift;
my $session = $self->session;
my $form = $session->form;
my $i18n = WebGUI::International->new($session,'CommercePaymentITransact');
my $i18n = WebGUI::International->new($session,'PayDriver_ITransact');
my @error;
# Check address data
@ -593,7 +593,7 @@ sub www_getCredentials {
my $errors = shift;
my $session = $self->session;
my $form = $session->form;
my $i18n = WebGUI::International->new($self->session, 'CommercePaymentITransact');
my $i18n = WebGUI::International->new($self->session, 'PayDriver_ITransact');
my $u = WebGUI::User->new($self->session,$self->session->user->userId);
# Process address from address book if passed