From 8bd72e42b3c15d61ccb80b1883337ed486cb0441 Mon Sep 17 00:00:00 2001
From: Pedro Amorim <pedro.amorim@ptfs-europe.com>
Date: Fri, 25 Aug 2023 16:26:10 +0000
Subject: [PATCH] Bug 34622: Fix store default query

Exclude self smtp server from all the servers being updated to not default if self is_default
---
 Koha/SMTP/Server.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/Koha/SMTP/Server.pm b/Koha/SMTP/Server.pm
index 44d3158aa8..f85b34e3d7 100644
--- a/Koha/SMTP/Server.pm
+++ b/Koha/SMTP/Server.pm
@@ -44,9 +44,9 @@ sub store {
 
     $self->_result->result_source->schema->txn_do(
         sub {
-            Koha::SMTP::Servers->search->update( { is_default => 0 },
-                { no_triggers => 1 } )
-              if $self->is_default;
+            Koha::SMTP::Servers->search( { id => { '!=' => $self->id } } )
+                ->update( { is_default => 0 }, { no_triggers => 1 } )
+                if $self->is_default;
 
             $self = $self->SUPER::store;
         }
-- 
2.30.2