From 96ea342c315f3ee5ee309c9515e38afbda638f75 Mon Sep 17 00:00:00 2001
From: lmstrand <lmstrand@gmail.com>
Date: Fri, 26 Jan 2024 10:36:00 +0200
Subject: [PATCH] Bug 35582: Show advanced search languages with selected
 intranet language descriptions first

To test:

1. Check language dropdowns in advanced search, notice localized
   names of the languages are shown first in the menus, then the
selected ui language translations if available or the english translation
2. Apply patch
3. Check language dropdowns, notice the selected ui language's
   translations are shown first for the languages (if missing, english
translation), then the localized
language's name.

Signed-off-by: Pedro Amorim <pedro.amorim@ptfs-europe.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit 9c445218deb8daa8704ae48433783e723d8e8649)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
(cherry picked from commit 2df2fbc309e06f6bb39e430349fb37a2efca3323)
Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
---
 C4/Languages.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/C4/Languages.pm b/C4/Languages.pm
index 04f2c8367c..21c4ce4e6f 100644
--- a/C4/Languages.pm
+++ b/C4/Languages.pm
@@ -227,10 +227,11 @@ sub getLanguages {
 
             # fill in the ISO6329 code
             $language_subtag_registry->{iso639_2_code} = $language_descriptions->{iso639_2_code};
-            # fill in the native description of the language, as well as the current language's translation of that if it exists
+            # fill in the current selected ui language's translation, as well as the native description of the language
             if ($native_description) {
-                $language_subtag_registry->{language_description} = $native_description;
-                $language_subtag_registry->{language_description}.=" ($language_descriptions->{description})" if $language_descriptions->{description};
+                $language_subtag_registry->{language_description} = $language_descriptions->{description}
+                    if $language_descriptions->{description};
+                $language_subtag_registry->{language_description} .= " ($native_description)";
             }
             else {
                 $language_subtag_registry->{language_description} = $language_descriptions->{description};
-- 
2.39.5