From 9885c646ae419a14bd8f90fc1a2e63c2137a02d5 Mon Sep 17 00:00:00 2001 From: Alex Buckley Date: Mon, 4 Apr 2022 04:22:39 +0000 Subject: [PATCH] Bug 23352: (follow-up) Fix QA test failure Sponsored-by: Catalyst IT Signed-off-by: Owen Leonard --- .../bug_23352-add_ccode_column_to_subscriptions_table.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/installer/data/mysql/atomicupdate/bug_23352-add_ccode_column_to_subscriptions_table.pl b/installer/data/mysql/atomicupdate/bug_23352-add_ccode_column_to_subscriptions_table.pl index c182576392..fd653b2f0b 100755 --- a/installer/data/mysql/atomicupdate/bug_23352-add_ccode_column_to_subscriptions_table.pl +++ b/installer/data/mysql/atomicupdate/bug_23352-add_ccode_column_to_subscriptions_table.pl @@ -1,11 +1,11 @@ use Modern::Perl; -{ +return { bug_number => "23352", description => "Adding new column 'subscription.ccode'", up => sub { my ($args) = @_; - my $dbh = $args->{dbh}; + my ($dbh, $out) = @$args{qw(dbh out)}; if( !column_exists( 'subscription', 'ccode' ) ) { $dbh->do(q{ @@ -13,4 +13,4 @@ use Modern::Perl; }); } }, -} +}; -- 2.20.1