From cc5a4598145c866da797b678fa476473336aa80c Mon Sep 17 00:00:00 2001
From: Rene Krenn <rkrenn@sipwise.com>
Date: Thu, 18 Mar 2021 13:49:19 +0100
Subject: [PATCH] TT#113450 prevent deleting primary alias

Change-Id: I8809daa123353a6e1defc3dff2870b9ad3e6551d
(cherry picked from commit cf178b491edd66c059ad1fc1ed8a0d0b80761073)
---
 lib/NGCP/Panel/Utils/Subscriber.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lib/NGCP/Panel/Utils/Subscriber.pm b/lib/NGCP/Panel/Utils/Subscriber.pm
index 435318116f..7d0cdc2cda 100644
--- a/lib/NGCP/Panel/Utils/Subscriber.pm
+++ b/lib/NGCP/Panel/Utils/Subscriber.pm
@@ -1507,12 +1507,13 @@ sub update_subscriber_numbers {
                 $alias->{e164}->{devid_alias} = delete $alias->{devid_alias};
             }
 
-            my $dbalias = $prov_subs->voip_dbaliases->find({
+            my $dbalias = $prov_subs->voip_dbaliases->search_rs({
                 username => $cli,
-            });
+                is_primary => 0,
+            })->first;
             if($dbalias) {
                 $dbalias->update({
-                    is_primary => 0,
+                    #is_primary => 0,
                     is_devid => $alias->{e164}->{is_devid} // 0,
                     devid_alias => $alias->{e164}->{devid_alias},
                 });