From e5cd0d44f55018b7106d6dc6bee5a4fea9cbc379 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Fri, 14 Dec 2018 13:30:27 -0300
Subject: [PATCH] Bug 22001: Add tests

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 t/db_dependent/Koha/Database.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/t/db_dependent/Koha/Database.t b/t/db_dependent/Koha/Database.t
index ca121de86d..2da6a3c7a1 100644
--- a/t/db_dependent/Koha/Database.t
+++ b/t/db_dependent/Koha/Database.t
@@ -16,9 +16,11 @@
 # along with Koha; if not, see <http://www.gnu.org/licenses>.
 
 use Modern::Perl;
-use Test::More tests => 1;
+use Test::More tests => 2;
 use C4::Context;
 
 my $dbh = C4::Context->dbh;
 my $sql_mode = $dbh->selectrow_array(q|SELECT @@SQL_MODE|);
 like( $sql_mode, qr{STRICT_TRANS_TABLES}, 'Strict SQL modes must be turned on for tests' );
+
+is( $dbh->{RaiseError}, 1, 'RaiseError must be turned on for tests' );
-- 
2.20.1