From 39c79a72be393b36e299490d189ff88c57bf901c Mon Sep 17 00:00:00 2001
From: Kornel Benko <kornel@lyx.org>
Date: Mon, 10 Mar 2014 13:33:46 +0100
Subject: [PATCH] ctests: pdf export for korean documents

Use Nanum-font for tests to get a readable pdf with luatatex/xelatex
---
 development/autotests/useSystemFonts.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/development/autotests/useSystemFonts.pl b/development/autotests/useSystemFonts.pl
index 7b71c82713..75d37e1a40 100644
--- a/development/autotests/useSystemFonts.pl
+++ b/development/autotests/useSystemFonts.pl
@@ -67,7 +67,7 @@ my ($source, $dest, $format, $fontT, $rest) = @ARGV;
 diestack("Too many arguments") if (defined($rest));
 diestack("Sourcefilename not defined") if (! defined($source));
 diestack("Destfilename not defined") if (! defined($dest));
-diestack("Format (e.g. pdf4) not defined") if (! defined($format));
+diestack("FoNamunrmat (e.g. pdf4) not defined") if (! defined($format));
 diestack("Font type (e.g. texF) not defined") if (! defined($fontT));
 
 $source = File::Spec->rel2abs($source);
@@ -94,6 +94,11 @@ if ($fontT eq "systemF") {
     $font{sans} = "WenQuanYi Micro Hei";
     $font{typewriter} = "WenQuanYi Micro Hei";
   }
+  elsif ($lang eq "ko" ) {
+    $font{roman} = "NanumGothic"; # NanumMyeongjo, NanumGothic Eco, NanumGothicCoding
+    $font{sans} = "NanumGothic";
+    $font{typewriter} = "NanumGothic";
+  }
   else {
     # default system fonts
     $font{roman} = "FreeSans";
-- 
2.39.5