Lines 1-7
Link Here
|
1 |
#!/usr/bin/perl |
1 |
#!/usr/bin/perl |
2 |
|
2 |
|
3 |
use Modern::Perl; |
3 |
use Modern::Perl; |
4 |
use Test::More tests => 1; |
4 |
use Test::More tests => 2; |
5 |
|
5 |
|
6 |
use t::lib::TestBuilder; |
6 |
use t::lib::TestBuilder; |
7 |
use C4::Auth; |
7 |
use C4::Auth; |
Lines 27-29
subtest 'basic session fetch' => sub {
Link Here
|
27 |
|
27 |
|
28 |
$schema->storage->txn_rollback; |
28 |
$schema->storage->txn_rollback; |
29 |
}; |
29 |
}; |
30 |
- |
30 |
|
|
|
31 |
subtest 'test session driver' => sub { |
32 |
plan tests => 1; |
33 |
|
34 |
my $params = Koha::Session->_get_session_params(); |
35 |
is( $params->{dsn}, 'serializer:yamlxs;driver:MySQL;id:md5', 'dsn setup correctly' ); |
36 |
}; |