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

(-)a/installer/data/mysql/atomicupdate/bug_2222.pl (-1 / +14 lines)
Line 0 Link Here
0
- 
1
use Modern::Perl;
2
3
return {
4
    bug_number => 2222,
5
    description => "Remove auth_subfield_structure.frameworkcode",
6
    up => sub {
7
        my ($args) = @_;
8
        my ($dbh, $out) = @$args{qw(dbh out)};
9
        my $sql = q|ALTER TABLE auth_subfield_structure DROP COLUMN frameworkcode|;
10
        if( column_exists( 'auth_subfield_structure', 'frameworkcode' ) ) {
11
           $dbh->do($sql);
12
        }
13
    },
14
};

Return to bug 2222