@@ -, +, @@ --- installer/data/mysql/atomicupdate/test_bz13068.sql | 3 --- installer/data/mysql/updatedatabase.pl | 11 +++++++---- 2 files changed, 7 insertions(+), 7 deletions(-) delete mode 100644 installer/data/mysql/atomicupdate/test_bz13068.sql --- a/installer/data/mysql/atomicupdate/test_bz13068.sql +++ a/installer/data/mysql/atomicupdate/test_bz13068.sql @@ -1,3 +0,0 @@ -CREATE TABLE test (`test` CHAR(8)); -INSERT INTO test (test) values ('1'), - ('2'); --- a/installer/data/mysql/updatedatabase.pl +++ a/installer/data/mysql/updatedatabase.pl @@ -9916,10 +9916,13 @@ if(CheckVersion($DBversion)) { my $update_dir = C4::Context->config('intranetdir') . '/installer/data/mysql/atomicupdate/'; opendir( my $dirh, $update_dir ); while ( my $file = readdir $dirh ) { - next unless $file =~ /\.sql$/; # skip non SQL files - print "DEV atomic update : $file \n"; - my $installer = C4::Installer->new(); - my $rv = $installer->load_sql( $update_dir . $file ) ? 0 : 1; + if ( $file =~ /\.sql$/ ) { # skip non SQL files + print "DEV atomic update : $file \n"; + my $installer = C4::Installer->new(); + my $rv = $installer->load_sql( $update_dir . $file ) ? 0 : 1; + } elsif ( $file =~ /\.perl$/ ) { + do $update_dir . $file; + } } --