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

(-)a/installer/data/mysql/atomicupdate/test_bz13068.sql (-3 lines)
Lines 1-3 Link Here
1
CREATE TABLE test (`test` CHAR(8));
2
INSERT INTO test (test) values ('1'),
3
                               ('2');
(-)a/installer/data/mysql/updatedatabase.pl (-5 / +7 lines)
Lines 9916-9925 if(CheckVersion($DBversion)) { Link Here
9916
my $update_dir = C4::Context->config('intranetdir') . '/installer/data/mysql/atomicupdate/';
9916
my $update_dir = C4::Context->config('intranetdir') . '/installer/data/mysql/atomicupdate/';
9917
opendir( my $dirh, $update_dir );
9917
opendir( my $dirh, $update_dir );
9918
while ( my $file = readdir $dirh ) {
9918
while ( my $file = readdir $dirh ) {
9919
    next unless $file =~ /\.sql$/;    # skip non SQL files
9919
    if ( $file =~ /\.sql$/ ) {    # skip non SQL files
9920
    print "DEV atomic update : $file \n";
9920
        print "DEV atomic update : $file \n";
9921
    my $installer = C4::Installer->new();
9921
        my $installer = C4::Installer->new();
9922
    my $rv = $installer->load_sql( $update_dir . $file ) ? 0 : 1;
9922
        my $rv = $installer->load_sql( $update_dir . $file ) ? 0 : 1;
9923
    } elsif ( $file =~ /\.perl$/ ) {
9924
        do $update_dir . $file;
9925
    }
9923
}
9926
}
9924
9927
9925
9928
9926
- 

Return to bug 13893