From 6ff836ab3154a886e0aeedb1152f6caf2e546444 Mon Sep 17 00:00:00 2001 From: Mark Tompsett Date: Sun, 18 Sep 2016 20:47:33 -0400 Subject: [PATCH] Bug 17292: Follow up - tweak to make it pass cleaner remove a 'my' next if not defined subscriptions. Signed-off-by: Mark Tompsett Signed-off-by: Jonathan Druart Signed-off-by: Brendan Gallagher --- 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 f638fa77e3..cda1b02037 100755 --- a/installer/data/mysql/updatedatabase.pl +++ b/installer/data/mysql/updatedatabase.pl @@ -11477,9 +11477,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