View | Details | Raw Unified | Return to bug 23352
Collapse All | Expand All

(-)a/installer/data/mysql/atomicupdate/bug_23352-add_ccode_column_to_subscriptions_table.pl (-4 / +3 lines)
Lines 1-11 Link Here
1
use Modern::Perl;
1
use Modern::Perl;
2
2
3
{
3
return {
4
    bug_number => "23352",
4
    bug_number => "23352",
5
    description => "Adding new column 'subscription.ccode'",
5
    description => "Adding new column 'subscription.ccode'",
6
    up => sub {
6
    up => sub {
7
        my ($args) = @_;
7
        my ($args) = @_;
8
        my $dbh = $args->{dbh};
8
        my ($dbh, $out) = @$args{qw(dbh out)};
9
9
10
        if( !column_exists( 'subscription', 'ccode' ) ) {
10
        if( !column_exists( 'subscription', 'ccode' ) ) {
11
          $dbh->do(q{
11
          $dbh->do(q{
Lines 13-16 use Modern::Perl; Link Here
13
          });
13
          });
14
        }
14
        }
15
    },
15
    },
16
}
16
};
17
- 

Return to bug 23352