Lines 27-34
use C4::Context;
Link Here
|
27 |
|
27 |
|
28 |
use Koha::Patrons; |
28 |
use Koha::Patrons; |
29 |
|
29 |
|
|
|
30 |
my $dbh = ''; |
31 |
|
32 |
# Start transaction |
30 |
my $schema = Koha::Database->new->schema; |
33 |
my $schema = Koha::Database->new->schema; |
31 |
$schema->storage->txn_begin; |
34 |
my $schema = $database->schema(); |
|
|
35 |
$schema->storage->txn_begin(); |
32 |
|
36 |
|
33 |
my $builder = t::lib::TestBuilder->new(); |
37 |
my $builder = t::lib::TestBuilder->new(); |
34 |
|
38 |
|
Lines 380-386
sub mock_net_ldap {
Link Here
|
380 |
'search', |
384 |
'search', |
381 |
sub { |
385 |
sub { |
382 |
|
386 |
|
383 |
$remaining_entry = 1 |
387 |
$remaining_entry = 1; |
384 |
|
388 |
|
385 |
return mock_net_ldap_search( |
389 |
return mock_net_ldap_search( |
386 |
{ |
390 |
{ |
Lines 477-482
sub is_admin_bind {
Link Here
|
477 |
return 0; |
481 |
return 0; |
478 |
} |
482 |
} |
479 |
|
483 |
|
480 |
$schema->storage->txn_rollback; |
484 |
$schema->storage->txn_rollback(); |
481 |
|
485 |
|
482 |
1; |
486 |
1; |
483 |
- |
|
|