diff --git a/src/korean/CatKor.gf b/src/korean/CatKor.gf
index 97939e9bf..8623b1cca 100644
--- a/src/korean/CatKor.gf
+++ b/src/korean/CatKor.gf
@@ -116,7 +116,7 @@ concrete CatKor of Cat = CommonX ** open ResKor, Prelude in {
     N = ResKor.Noun ;
     N2 = ResKor.Noun2 ;
     N3 = ResKor.Noun3 ;
-    PN = ResKor.PNoun ;
+    PN = ResKor.NounPhrase ;
 
 linref
   V, V2, V3, VP = linVerb ;
diff --git a/src/korean/NounKor.gf b/src/korean/NounKor.gf
index b31105b44..73ef7f626 100644
--- a/src/korean/NounKor.gf
+++ b/src/korean/NounKor.gf
@@ -27,7 +27,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
 --    } ;
 
   -- : Pron -> NP ;
-  -- UsePron pron = pron ;
+  UsePron pron = pron ** {empty = []};
 
   -- : Predet -> NP -> NP ; -- only the man
   PredetNP predet np = np ** {s =
@@ -130,10 +130,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
   IndefArt = mkQuant [] [] ;
 
   -- : Pron -> Quant
-  -- PossPron pron =
-  --   let p = pron.poss ;
-  --    in DefArt ** {
-  --       } ;
+  PossPron pron = pron.poss ;
 
 --2 Common nouns
 
diff --git a/src/korean/StructuralKor.gf b/src/korean/StructuralKor.gf
index 4123c7e21..477b401ed 100644
--- a/src/korean/StructuralKor.gf
+++ b/src/korean/StructuralKor.gf
@@ -130,7 +130,7 @@ lin to_Prep = mkPrep "에";
 -- Pronouns are closed class, no constructor in ParadigmsKor.
   -- it_Pron =
   i_Pron = let iReg : Pronoun = mkPron "저" "제" in
-    iReg ** {s = table {Subj => "제가"; nf => iReg.s ! nf}
+    iReg ** {s = table {Subject => "제가"; nf => iReg.s ! nf}
     } ;
   youPol_Pron = mkPron "당신" ;
   youSg_Pron = mkPron "너" ; -- NB. this is very informal, best not used