::logGlobal("%s v0.7.3 payment module initialised, using %s", __PACKAGE__, \
 $selected) unless $Vend::Quiet;

}

package Vend::Payment;
use strict;
my ($gcourl,$merchantid,$merchantkey,$gcoserver,$xmlOut, $taxrate, $state, \
 $header, $gcorequest, $actual, $orderID);

sub googlecheckout {
my ($opt, $purchaseID, $mv_order_number, $msg, $cart, %result);
     $gcoserver   = charge_param('googlehost')  || $::Variable->{MV_PAYMENT_HOST} \
 || 'https://checkout.google.com/api/checkout/v2'; # live
my $catroot     = charge_param('cat_root') || $::Variable->{CAT_ROOT};
my $ordersdir   = charge_param('ordersdir') || 'orders';
my $currency    = $::Values->{currency} || charge_param('currency') || 'GBP';  
my $editbasketurl = charge_param('edit_basket_url') || $::Variable->{EDIT_BASKET_URL};

}
}
# wrap around everything to bottom
else {
my %actual = map_actual();
$actual  = \%actual;
$opt     = {};

#::logDebug("actual map result: " . ::uneval($actual));
$vendor   = $opt->{id} || charge_param('id') || $::Variable->{MV_PAYMENT_ID};
$opt->{host}   = charge_param('host') || $::Variable->{MV_PAYMENT_HOST} \
 \
 || 'ukvpstest.protx.com';
$opt->{use_wget} = charge_param('use_wget') || '1';
$opt->{port}   = '443';

    if ($txtype =~ /DEFERRED|PAYMENT|AUTHENTICATE|PREAUTH/i) {

my $deliveryState;

my %result;
my %query;

my (%actual) = map_actual();
$actual  = \%actual;
$opt     = {};

$vendor   = $opt->{id} || charge_param('id') || $::Variable->{MV_PAYMENT_ID};
$opt->{host} = charge_param('host') || $::Variable->{MV_PAYMENT_HOST} || 'live.sagepay.com';
$sagepayrequest = $opt->{sagepayrequest} = charge_param('sagepayrequest') || 'post';
$opt->{use_wget} = charge_param('use_wget') || '1';
$opt->{port}   = '443';
#::logDebug("SP".__LINE__.": host=$opt->{host}; spreq=$sagepayrequest");