From: ivan Date: Fri, 22 Jul 2011 17:27:11 +0000 (+0000) Subject: finish upgrade even if a void_usernum cannot be determined for some records, RT#13600 X-Git-Tag: freeside_2_3_0~5 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=7bdfe4ec14c33db9e42251c726d56d96cc5bc0bc finish upgrade even if a void_usernum cannot be determined for some records, RT#13600 --- 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;