From de33c46b45544f7f35c4ef2cbc857f2ad9fb1263 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Mon, 12 Nov 2018 16:58:21 +0100
Subject: [PATCH] (Ara) AdjCN retains old adjective

---
 src/arabic/NounAra.gf | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/arabic/NounAra.gf b/src/arabic/NounAra.gf
index 7f7e7092b..7547064c4 100644
--- a/src/arabic/NounAra.gf
+++ b/src/arabic/NounAra.gf
@@ -186,7 +186,7 @@ lin
   ComplN3 n3 np = ComplN2 n3 np ** {c2 = n3.c3} ;
 
   AdjCN ap cn = cn ** {
-    adj = \\n,d,c => ap.s ! cn.h ! cn.g ! n ! (definite ! d) ! c 
+    adj = \\n,d,c => cn.adj ! n ! d ! c ++ ap.s ! cn.h ! cn.g ! n ! (definite ! d) ! c 
     };
 
   RelCN cn rs = cn ** {s = \\n,s,c => cn.s ! n ! s ! c ++ rs.s ! {pgn=Per3 cn.g n ; isPron=False} ! c};