From 764ab7d2d181277f20f31c858ea84816becc99ce Mon Sep 17 00:00:00 2001
From: Rene Krenn <rkrenn@sipwise.com>
Date: Thu, 6 Mar 2025 14:27:39 +0100
Subject: [PATCH] MT#62283 exclude "for update no lock" in tests

Change-Id: I12ff4d1f8ba0b150a1918de40dafa1efd6a92c10
---
 lib/NGCP/Panel/Controller/API/Contracts.pm             | 2 +-
 lib/NGCP/Panel/Controller/API/Customers.pm             | 2 +-
 lib/NGCP/Panel/Controller/API/SubscriberPreferences.pm | 2 +-
 lib/NGCP/Panel/Controller/API/Subscribers.pm           | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/NGCP/Panel/Controller/API/Contracts.pm b/lib/NGCP/Panel/Controller/API/Contracts.pm
index 0ce07d4524..8c0c62ed93 100644
--- a/lib/NGCP/Panel/Controller/API/Contracts.pm
+++ b/lib/NGCP/Panel/Controller/API/Contracts.pm
@@ -98,7 +98,7 @@ sub GET :Allow {
             c => $c,
             rs => $contracts_rs,
             contract_id_field => 'id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my (@embedded, @links);
         my $form = $self->get_form($c);
diff --git a/lib/NGCP/Panel/Controller/API/Customers.pm b/lib/NGCP/Panel/Controller/API/Customers.pm
index c4607b4525..227a163ef4 100644
--- a/lib/NGCP/Panel/Controller/API/Customers.pm
+++ b/lib/NGCP/Panel/Controller/API/Customers.pm
@@ -171,7 +171,7 @@ sub GET :Allow {
             c => $c,
             rs => $customers_rs,
             contract_id_field => 'id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my (@embedded, @links);
         my $form = $self->get_form($c);
diff --git a/lib/NGCP/Panel/Controller/API/SubscriberPreferences.pm b/lib/NGCP/Panel/Controller/API/SubscriberPreferences.pm
index 7bda0668df..6058bca360 100644
--- a/lib/NGCP/Panel/Controller/API/SubscriberPreferences.pm
+++ b/lib/NGCP/Panel/Controller/API/SubscriberPreferences.pm
@@ -96,7 +96,7 @@ sub GET :Allow {
             c => $c,
             rs => $subscribers_rs,
             contract_id_field => 'contract_id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my $now = NGCP::Panel::Utils::DateTime::current_local;
         my (@embedded, @links, %contract_map);
diff --git a/lib/NGCP/Panel/Controller/API/Subscribers.pm b/lib/NGCP/Panel/Controller/API/Subscribers.pm
index 8d695b5f51..3958209856 100644
--- a/lib/NGCP/Panel/Controller/API/Subscribers.pm
+++ b/lib/NGCP/Panel/Controller/API/Subscribers.pm
@@ -323,7 +323,7 @@ sub GET :Allow {
             c => $c,
             rs => $subscribers_rs,
             contract_id_field => 'contract_id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my $now = NGCP::Panel::Utils::DateTime::current_local;
         my (@embedded, @links, %contract_map);