summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2002-09-10 03:31:00 +0000
committerivan <ivan>2002-09-10 03:31:00 +0000
commit27b1e8e41b7d4ace60b286ec02a171009aee83f2 (patch)
treef9361624284cd2844731edb89f171c61c66df6dd
parent88357d0c76bd7c257d4d87da0a59f8814f925049 (diff)
Business::OnlinePaymet fix for processors w/o order numbers, like VirtualNet
-rw-r--r--FS/FS/cust_bill.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm
index 5e041ea59..d49657e2e 100644
--- a/FS/FS/cust_bill.pm
+++ b/FS/FS/cust_bill.pm
@@ -674,7 +674,9 @@ sub realtime_card {
if ( $transaction->is_success() && $action2 ) {
my $auth = $transaction->authorization;
- my $ordernum = $transaction->order_number;
+ my $ordernum = $transaction->can('order_number')
+ ? $transaction->order_number
+ : '';
#warn "********* $auth ***********\n";
#warn "********* $ordernum ***********\n";
@@ -1112,7 +1114,7 @@ sub print_text {
=head1 VERSION
-$Id: cust_bill.pm,v 1.41 2002-09-05 16:51:49 ivan Exp $
+$Id: cust_bill.pm,v 1.42 2002-09-10 03:31:00 ivan Exp $
=head1 BUGS