From 72732a736d93ebab2b8d2737c39145abe9d2b500 Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Tue, 28 Jun 2022 12:29:05 +0100
Subject: [PATCH] Bug 30677: Cleanup

This patch cleans up the regular expression to remove the superflous
double check and use standard delimiters

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 667722daa34ce6acaf47f2bd94434260dcc76d48)

Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
---
 Koha/REST/V1/Acquisitions/Orders.pm | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/Koha/REST/V1/Acquisitions/Orders.pm b/Koha/REST/V1/Acquisitions/Orders.pm
index 1ed0243e3d..ae9c1bafbc 100644
--- a/Koha/REST/V1/Acquisitions/Orders.pm
+++ b/Koha/REST/V1/Acquisitions/Orders.pm
@@ -343,10 +343,7 @@ UI.
 
 sub table_name_fixer {
     my ( $self, $q ) = @_;
-
-    $q =~ s{biblio\.(?=isbn|ean|publisher)}{biblio\.biblioitem\.}g
-      if $q =~ m/.*(isbn|ean|publisher).*/;
-
+    $q =~ s/biblio\.(?=isbn|ean|publisher)/biblio.biblioitem./g;
     return $q;
 }
 
-- 
2.39.5