Bug 17715: Remove itemtype-related t/db_dependent/Holds/RevertWaitingStatus.t warnings

[srvgit] / t / db_dependent / Auth_with_ldap.t

diff --git a/t/db_dependent/Auth_with_ldap.t b/t/db_dependent/Auth_with_ldap.t
index c925c70..446982c 100755 (executable)
--- a/t/db_dependent/Auth_with_ldap.t
+++ b/t/db_dependent/Auth_with_ldap.t
@@ -25,11 +25,10 @@ use Test::Warn;
 
 use C4::Context;
 
-my $dbh = C4::Context->dbh;
+use Koha::Patrons;
 
-# Start transaction
-$dbh->{AutoCommit} = 0;
-$dbh->{RaiseError} = 1;
+my $schema = Koha::Database->new->schema;
+$schema->storage->txn_begin;
 
 my $builder = t::lib::TestBuilder->new();
 
@@ -116,6 +115,7 @@ subtest 'checkpw_ldap tests' => sub {
 
     plan tests => 4;
 
+    my $dbh = C4::Context->dbh;
     ## Connection fail tests
     $desired_connection_result = 'error';
     warning_is {
@@ -179,7 +179,7 @@ subtest 'checkpw_ldap tests' => sub {
 
         $update               = 0;
         $desired_count_result = 0;    # user auth problem
-        C4::Members::DelMember( $borrower->{borrowernumber} );
+        Koha::Patrons->find( $borrower->{borrowernumber} )->delete;
         reload_ldap_module();
         is(
             C4::Auth_with_ldap::checkpw_ldap( $dbh, 'hola', password => 'hey' ),
@@ -506,6 +506,6 @@ sub reload_ldap_module {
     return;
 }
 
-$dbh->rollback;
+$schema->storage->txn_rollback;
 
 1;