From 7bdfe4ec14c33db9e42251c726d56d96cc5bc0bc Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 22 Jul 2011 17:27:11 +0000
Subject: [PATCH] finish upgrade even if a void_usernum cannot be determined
 for some records, RT#13600

---
 FS/FS/cust_pay_void.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/FS/FS/cust_pay_void.pm b/FS/FS/cust_pay_void.pm
index 0b8959193..1e22e1c09 100644
--- a/FS/FS/cust_pay_void.pm
+++ b/FS/FS/cust_pay_void.pm
@@ -258,7 +258,8 @@ sub _upgrade_data {  # class method
 
   foreach my $cust_pay_void (qsearch('cust_pay_void', {'void_usernum' => ''})) {
     $sth->execute($cust_pay_void->paynum) or die $sth->errstr;
-    my $usernum = $sth->fetchrow_arrayref->[0] or next;
+    my $row = $sth->fetchrow_arrayref;
+    my $usernum = $row ? $row->[0] : '';
     if ( $usernum ) {
       $cust_pay_void->void_usernum($usernum);
       my $error = $cust_pay_void->replace;
-- 
2.11.0