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>
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