|
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 |
}; |