diff options
| -rw-r--r-- | BusinessOnlinePayment.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/BusinessOnlinePayment.pm b/BusinessOnlinePayment.pm index 4df0e49..5c1a167 100644 --- a/BusinessOnlinePayment.pm +++ b/BusinessOnlinePayment.pm @@ -283,7 +283,9 @@ sub onlinepayment { if ( $transaction->is_success() ) { $result{MStatus} = 'success'; - $result{'order-id'} = $transaction->order_number || $opt->{'order_id'}; + $result{'order-id'} = + ( $transaction->can('order_number') && $transaction->order_number ) + || $opt->{'order_id'}; } else { |