diff options
author | ivan <ivan> | 2005-09-24 22:53:25 +0000 |
---|---|---|
committer | ivan <ivan> | 2005-09-24 22:53:25 +0000 |
commit | 672f360a644d12d7eab223fd00cd3426b00756cd (patch) | |
tree | 8ddea0a148cf5376e2fbe6344f94d89faa2d07c6 | |
parent | 2ffb2484b5ccc1400dfd5676d99d19f447c9130a (diff) |
parse paybatch order number with dashes correctly
-rw-r--r-- | FS/FS/cust_main.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 2a8eb1ddc..fc6a927ee 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -2576,7 +2576,7 @@ sub realtime_refund_bop { or return "Unknown paynum $options{'paynum'}"; $amount ||= $cust_pay->paid; - $cust_pay->paybatch =~ /^((\d+)\-)?(\w+):([\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 = ''; |