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

Bug 22472: Add tests 

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2019-03-07 09:14:06 -03:00 committed by Nick Clemens
parent 9cbc5f2aa0
commit 19b9aacfba
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
t/db_dependent/Installer.t
View File

@ -22,7 +22,7 @@
# Add more tests here!!!
use Modern::Perl;
use Test::More tests => 15;
use Test::More tests => 16;
use Koha::Database;
BEGIN {
@ -56,7 +56,11 @@ 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 $dbh = C4::Context->dbh;
$dbh->{RaiseError} = 1;
ok( ! column_exists( 'this_table_will_never_exist', 'xxx'), 'Column xxx does not exist, the table does not exist' );
}
my @constraint_names = $source->unique_constraint_names();
my $constraint_name = $constraint_names[0];
ok( index_exists( 'borrowers', $constraint_name), 'Known contraint does exist' );