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

(-)a/t/db_dependent/Koha/Database.t (-2 / +3 lines)
Lines 16-24 Link Here
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Test::More tests => 1;
19
use Test::More tests => 2;
20
use C4::Context;
20
use C4::Context;
21
21
22
my $dbh = C4::Context->dbh;
22
my $dbh = C4::Context->dbh;
23
my $sql_mode = $dbh->selectrow_array(q|SELECT @@SQL_MODE|);
23
my $sql_mode = $dbh->selectrow_array(q|SELECT @@SQL_MODE|);
24
like( $sql_mode, qr{STRICT_TRANS_TABLES}, 'Strict SQL modes must be turned on for tests' );
24
like( $sql_mode, qr{STRICT_TRANS_TABLES}, 'Strict SQL modes must be turned on for tests' );
25
- 
25
26
is( $dbh->{RaiseError}, 1, 'RaiseError must be turned on for tests' );

Return to bug 22001