},
'count_query' => $count_query,
'header' => [ '#',
+ 'Type',
'Gateway',
'Username',
'Password',
'Action',
+ 'URL',
'Options',
],
'fields' => [ 'gatewaynum',
+ 'namespace_description',
$gateway_sub,
'gateway_username',
sub { ' - '; },
'gateway_action',
+ 'gateway_callback_url',
$options_sub,
],
)
my $html = '<TABLE CELLSPACING=0 CELLPADDING=0>';
- my %options = $payment_gateway->options;
+ tie my %options, 'Tie::IxHash', $payment_gateway->options;
foreach my $option ( keys %options ) {
- $html .= '<TR><TH>'. $option. ':</TH>'.
+ $html .= '<TR><TH ALIGN="right">'. $option. ':</TH>'.
'<TD>'. $options{$option}. '</TD></TR>';
}
$html .= '</TABLE>';