From faf33a27abccfb0b7fbf5542375b834a1acba059 Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Thu, 25 Mar 2021 13:32:39 +0000
Subject: [PATCH] Bug 21958: (QA follow-up) Correct indirect object notation

Our coding guidelines now forbit indirect object notation calling.

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 t/db_dependent/AuthoritiesMarc/MARC21.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/db_dependent/AuthoritiesMarc/MARC21.t b/t/db_dependent/AuthoritiesMarc/MARC21.t
index 77047e4bbc..d8ccde0d3f 100755
--- a/t/db_dependent/AuthoritiesMarc/MARC21.t
+++ b/t/db_dependent/AuthoritiesMarc/MARC21.t
@@ -28,7 +28,7 @@ subtest 'CompareFieldWithAuthority tests' => sub {
 
     # We are now going to be testing the authorities hierarchy code, and
     # therefore need to pretend that we have consistent data in our database
-    my $module = new Test::MockModule('C4::AuthoritiesMarc');
+    my $module = Test::MockModule->new('C4::AuthoritiesMarc');
     $module->mock('GetHeaderAuthority', sub {
         return {'authtrees' => ''};
     });
-- 
2.39.5