From e1d411d331c5ed57f1610d98b98d54245ae686e9 Mon Sep 17 00:00:00 2001
From: Ricky Jang <shyblue@users.sourceforge.net>
Date: Mon, 20 Nov 2000 17:48:50 +0000
Subject: [PATCH] Add exam code for edited Korean lang api

---
 harbour/tests/langapi.prg | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/harbour/tests/langapi.prg b/harbour/tests/langapi.prg
index ac5f08e37d..7149b7a7fe 100644
--- a/harbour/tests/langapi.prg
+++ b/harbour/tests/langapi.prg
@@ -5,6 +5,7 @@
 // ; Donated to the public domain by Victor Szakats <info@szelvesz.hu>
 
 REQUEST HB_LANG_HU852
+REQUEST HB_LANG_KO
 
 func main()
 
@@ -29,5 +30,12 @@ func main()
 ? CDOW( Date() )
 ? "---------"
 
+? "Prev:", hb_langSelect( "KO" )
+? hb_langName()
+? NationMsg( 1 )
+? CMonth( Date() )
+? CDOW( Date() )
+? "---------"
+
 return nil