From: ivan <ivan>
Date: Sat, 24 Sep 2005 22:53:25 +0000 (+0000)
Subject: parse paybatch order number with dashes correctly
X-Git-Tag: BEFORE_FINAL_MASONIZE~387
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=672f360a644d12d7eab223fd00cd3426b00756cd

parse paybatch order number with dashes correctly
---

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 = '';