From 11074092311b11b1553eb1fe7cfe169b4a8b6f57 Mon Sep 17 00:00:00 2001
From: Mark Tompsett <mtompset@hotmail.com>
Date: Sun, 18 Sep 2016 20:47:33 -0400
Subject: [PATCH] Bug 17292: Follow up - tweak to make it pass cleaner
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

remove a 'my'
next if not defined subscriptions.

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Brendan Gallagher <brendan@bywatersolutions.com>
(cherry picked from commit 6ff836ab3154a886e0aeedb1152f6caf2e546444)
Signed-off-by: Frédéric Demians <f.demians@tamil.fr>
---
 installer/data/mysql/updatedatabase.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl
index ca5e059fc8..5e4be32997 100755
--- a/installer/data/mysql/updatedatabase.pl
+++ b/installer/data/mysql/updatedatabase.pl
@@ -11474,9 +11474,10 @@ if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
     my $sth3 = $dbh->prepare("UPDATE serials SET serialseq_x = ?, serialseq_y = ?, serialseq_z = ? WHERE serialid = ?");
 
     foreach my $subscription ( $sth->fetchrow_hashref() ) {
+        next if !defined($subscription);
         my $number_pattern = $subscription->numberpattern();
         $sth2->execute( $subscription->{numberpattern} );
-        my $number_pattern = $sth2->fetchrow_hashref();
+        $number_pattern = $sth2->fetchrow_hashref();
 
         my $numbering_method = $number_pattern->{numberingmethod};
         # Get all the data between the enumeration values, we need
-- 
2.39.5