From a8e01a81d1c81d77222eec4384cbc2d0f440b1dc Mon Sep 17 00:00:00 2001
From: =?utf8?q?G=C3=BCnter=20Milde?= <milde@lyx.org>
Date: Fri, 15 Feb 2019 07:07:15 +0100
Subject: [PATCH] ctests: useSystemFonts.pl -- revert changes in
 1879fbedfb67cc6.

---
 development/autotests/useSystemFonts.pl | 31 ++++++++++++++++++++++---
 1 file changed, 28 insertions(+), 3 deletions(-)

diff --git a/development/autotests/useSystemFonts.pl b/development/autotests/useSystemFonts.pl
index e9bbd08a1b..aeee3dafe9 100644
--- a/development/autotests/useSystemFonts.pl
+++ b/development/autotests/useSystemFonts.pl
@@ -86,9 +86,34 @@ if ($source =~ /\/([a-z][a-z](_[A-Z][A-Z])?)[\/_]/) {
 
 my $inputEncoding = undef;
 if ($fontT eq "systemF") {
-  if ($font{roman} eq "default") {
-    # Change non-tex fonts setting if it is "default".
-    # TODO: set in document (if required).
+  if ($lang =~ /^(ru|uk|sk|el)$/) {
+    $font{roman} = "DejaVu Serif";
+    $font{sans} = "DejaVu Sans";
+    $font{typewriter} = "DejaVu Sans Mono";
+  }
+  elsif ($lang =~ /^(he)$/) {
+    $font{roman} = "FreeSans";
+    $font{sans} = "FreeSans";
+    $font{typewriter} = "FreeSans";
+  }
+  elsif ($lang eq "fa") {
+    $font{roman} = "FreeFarsi";
+    $font{sans} = "FreeFarsi";
+    $font{typewriter} = "FreeFarsi Monospace";
+  }
+  elsif ($lang eq "ko" ) {
+    # $font{roman} = "NanumGothic"; # NanumMyeongjo, NanumGothic Eco, NanumGothicCoding
+    # $font{sans} = "NanumGothic";
+    # $font{typewriter} = "NanumGothic";
+  }
+  elsif ($lang eq "ar" ) {
+    # available in 'fonts-sil-scheherazade' package
+    $font{roman} = "Scheherazade";
+    $font{sans} = "Scheherazade";
+    $font{typewriter} = "Scheherazade";
+  }
+  else {
+    # default system fonts
     $font{roman} = "FreeSerif";
     $font{sans} = "FreeSans";
     $font{typewriter} = "FreeMono";
-- 
2.39.5