summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2007-03-02 23:48:18 +0000
committerivan <ivan>2007-03-02 23:48:18 +0000
commit2c1569aebafcf123ad71785f67d8ec005ffa04b3 (patch)
tree7a9e5910b4e69d355e76272d8ab55087ff1a565b
parenta0290148dced03b17bd75d93e640e5ef5e8a28e3 (diff)
eProcessingNetwork returning an authorization like "AUTH/TKT 123456"... will this make refunds work?
-rw-r--r--FS/FS/cust_main.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index fe6aa50a7..c6212756a 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -2898,7 +2898,7 @@ sub realtime_refund_bop {
or return "Unknown paynum $options{'paynum'}";
$amount ||= $cust_pay->paid;
- $cust_pay->paybatch =~ /^((\d+)\-)?(\w+):\s*([\w\-]*)(:([\w\-]+))?$/
+ $cust_pay->paybatch =~ /^((\d+)\-)?(\w+):\s*([\w\-\/ ]*)(:([\w\-]+))?$/
or return "Can't parse paybatch for paynum $options{'paynum'}: ".
$cust_pay->paybatch;
my $gatewaynum = '';