gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 17234: Test the column and constraint non-existence 

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
(cherry picked from commit 435b7badc2)
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
This commit is contained in:
Jonathan Druart 2017-01-02 11:36:53 +01:00 committed by Katrin Fischer
parent 4518ec795d
commit cd6782d5b4
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
t/db_dependent/Installer.t
View File

@ -22,7 +22,7 @@
# Add more tests here!!!
use Modern::Perl;
use Test::More tests => 11;
use Test::More tests => 13;
use Koha::Database;
BEGIN {
@ -55,8 +55,9 @@ my $source = $schema->source('Borrower');
my @column_names = $source->columns();
my $column_name = $column_names[0];
ok( column_exists( 'borrowers', $column_name ), 'Known column does exist' );
ok( ! column_exists( 'borrowers', 'xxx'), 'Column xxx does not exist' );
my @constraint_names = $source->unique_constraint_names();
my $constraint_name = $constraint_names[0];
ok( constraint_exists( 'borrowers', $constraint_name ),
'Known constraint does exist' );
ok( constraint_exists( 'borrowers', $constraint_name), 'Known contraint does exist' );
ok( ! constraint_exists( 'borrowers', 'xxx'), 'Constraint xxx does not exist' );