From 9e57766263e1574555ded983765973d6a8df5778 Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Mon, 27 Apr 2020 13:00:24 +0200 Subject: [PATCH] (Hun) Use regNoun in mkAdj --- src/hungarian/ResHun.gf | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/hungarian/ResHun.gf b/src/hungarian/ResHun.gf index 441fb6066..89debf332 100644 --- a/src/hungarian/ResHun.gf +++ b/src/hungarian/ResHun.gf @@ -321,7 +321,7 @@ oper isPost : Bool ; -- put adjective past the thing it modifies } ; - mkAdj : Str -> Adjective = \sgnom -> mkAdj2 sgnom (mkNoun sgnom) ; + mkAdj : Str -> Adjective = \sgnom -> mkAdj2 sgnom (regNoun sgnom) ; mkAdj2 : Str -> Noun -> Adjective = \sgnom,adjAsNoun -> adjAsNoun ** {