commerce bug fixes
This commit is contained in:
parent
b57f289706
commit
60a6f97c48
3 changed files with 7 additions and 8 deletions
|
|
@ -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 } ) {
|
||||
|
|
|
|||
|
|
@ -30,7 +30,7 @@ sub definition {
|
|||
tie my %fields, 'Tie::IxHash';
|
||||
|
||||
push @{ $definition }, {
|
||||
name => $i18n->echo('Cash'),
|
||||
name => $i18n->get('label'),
|
||||
properties => \%fields,
|
||||
};
|
||||
|
||||
|
|
|
|||
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue