Bug 29234: Further clean Z3950 Tests

[koha-ffzg.git] / t / db_dependent / Koha / Z3950Responder / Session.t

diff --git a/t/db_dependent/Koha/Z3950Responder/Session.t b/t/db_dependent/Koha/Z3950Responder/Session.t
index 48ef6d9..f6e7c65 100755 (executable)
--- a/t/db_dependent/Koha/Z3950Responder/Session.t
+++ b/t/db_dependent/Koha/Z3950Responder/Session.t
@@ -54,6 +54,10 @@ subtest 'add_item_status' => sub {
     my $item_field_2 = scalar $item_marc_2->field($itemtag);
     ## END SECOND ITEM ##
 
+    # We want to test the default values, so we remove custom status alias if present
+    my $available = Koha::AuthorisedValues->find({ category => 'Z3950_STATUS', authorised_value => 'AVAILABLE' });
+    $available->delete if $available;
+
     # Create the responder
     my $args={ PEER_NAME => 'PEER'};
     my $zR = Koha::Z3950Responder->new({add_item_status_subfield => 'k'});