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

(-)a/installer/data/mysql/atomicupdate/bug_40478.pl (-1 / +22 lines)
Line 0 Link Here
0
- 
1
use Modern::Perl;
2
use Koha::Installer::Output qw(say_warning say_success say_info);
3
4
return {
5
    bug_number  => "40478",
6
    description => "Add barcode justification option to label creator",
7
    up          => sub {
8
        my ($args) = @_;
9
        my ( $dbh, $out ) = @$args{qw(dbh out)};
10
11
        unless ( column_exists( 'creator_layouts', 'barcode_justify' ) ) {
12
            $dbh->do(
13
                q{
14
                    ALTER TABLE creator_layouts
15
                    ADD COLUMN barcode_justify CHAR(1) DEFAULT 'L'
16
                    AFTER text_justify
17
                }
18
            );
19
        }
20
        say_success( $out, "barcode_justify column added to creator_layouts" );
21
    },
22
};

Return to bug 40478