From bb86116221ada7efd50a95eed689d6f94772afbc Mon Sep 17 00:00:00 2001
From: Alex Buckley <alexbuckley@catalyst.net.nz>
Date: Wed, 1 Feb 2023 14:41:22 +1300
Subject: [PATCH] Bug 32775: Do not order language directories based on when
 they were created

Sponsored-by: Kinder library, New Zealand
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
---
 C4/Languages.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Languages.pm b/C4/Languages.pm
index c05c31bf9e..9dcd3cf337 100644
--- a/C4/Languages.pm
+++ b/C4/Languages.pm
@@ -314,7 +314,7 @@ sub _get_language_dirs {
     $theme //= '';
     my @lang_strings;
     opendir D, "$htdocs/$theme";
-    for my $lang_string ( readdir D ) {
+    for my $lang_string ( sort readdir D ) {
         next if $lang_string =~/^\./;
         next if $lang_string eq 'all';
         next if $lang_string =~/png$/;
-- 
2.30.2