Bug 27673: Replace YAML with YAML::XS
[koha-ffzg.git] / t / db_dependent / OAI / Server.t
index 25316ce..7efac23 100755 (executable)
@@ -27,7 +27,7 @@ use File::Spec;
 use Test::MockModule;
 use Test::Warn;
 use XML::Simple;
-use YAML;
+use YAML::XS;
 
 use t::lib::Mocks;
 
@@ -176,9 +176,9 @@ sub test_query {
     delete $response->{responseDate};
     unless (is_deeply($response, \%full_expected, $test)) {
         diag
-            "PARAM:" . Dump($param) .
-            "EXPECTED:" . Dump(\%full_expected) .
-            "RESPONSE:" . Dump($response);
+            "PARAM:" . YAML::XS::Dump($param) .
+            "EXPECTED:" . YAML::XS::Dump(\%full_expected) .
+            "RESPONSE:" . YAML::XS::Dump($response);
     }
 }