From f67608a636cb3b20a8824fc85b86532692e808d2 Mon Sep 17 00:00:00 2001
From: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Date: Wed, 12 Jul 2017 13:33:51 +0200
Subject: [PATCH] Bug 18901: [QA Follow-up] Do not translate zzpref either

Adding one backslash makes a difference :)
We need to escape the dot in the regex to exclude a file like zzpref
from translation too. Perfect_regexes++

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
(cherry picked from commit a2c9513b1c3449a34f942d8fa53f8ce1fe374e3f)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
(cherry picked from commit 6896fdc5b31178ad9cde381d2b3b3edb2e8e37f9)
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
---
 misc/translator/LangInstaller.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/misc/translator/LangInstaller.pm b/misc/translator/LangInstaller.pm
index feaeb7aa5a..cd947fc3b3 100644
--- a/misc/translator/LangInstaller.pm
+++ b/misc/translator/LangInstaller.pm
@@ -82,7 +82,7 @@ sub new {
 
     # Get all .pref file names
     opendir my $fh, $self->{path_pref_en};
-    my @pref_files = grep { /.pref$/ } readdir($fh);
+    my @pref_files = grep { /\.pref$/ } readdir($fh);
     close $fh;
     $self->{pref_files} = \@pref_files;
 
-- 
2.39.2