From b086b774bfb2d34dbdf2a8fe5ccbb1b742579165 Mon Sep 17 00:00:00 2001
From: Meowyam <maryam@chilon.net>
Date: Mon, 15 Nov 2021 14:01:16 +0800
Subject: [PATCH] correct verb form for like

---
 src/malay/LexiconMay.gf | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/malay/LexiconMay.gf b/src/malay/LexiconMay.gf
index f9f28d148..f2cf96d1d 100644
--- a/src/malay/LexiconMay.gf
+++ b/src/malay/LexiconMay.gf
@@ -209,7 +209,10 @@ lin learn_V2 = mkV2 (prefixV (mkV "ajar" Ber)) emptyPrep ;
 -- lin leave_V2 = mkV2 "" ;
 -- lin leg_N = mkN "" ;
 -- lin lie_V = mkV "" ;
-lin like_V2 = mkV2 "suka" ;
+lin like_V2 = let like' : V2 = mkV2 "suka" in like' ** {
+  s = \\_ => "suka" ;
+  passive = "disukai" ;
+} ;
 -- lin listen_V2 = mkV2 "" ;
 -- lin live_V = mkV "";
 -- lin liver_N = mkN "" ;