From b8b43689bcdea419dcc91681145d9cab8aba13b1 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Fri, 27 Sep 2019 17:53:57 +0200
Subject: [PATCH] (Som) Small bugfixes in RelCN and PartNP

---
 src/somali/NounSom.gf | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/somali/NounSom.gf b/src/somali/NounSom.gf
index 37be7bf66..e41754d1f 100644
--- a/src/somali/NounSom.gf
+++ b/src/somali/NounSom.gf
@@ -277,9 +277,7 @@ concrete NounSom of Noun = CatSom ** open ResSom, Prelude in {
             cn.mod ! st ! n ! Abs
          ++ andConj st cn.modtype
          ++ rs.s ! st ! gennum cn Sg ! c ; -- gennum cn Sg, because plural form is only for 1st person plural
-    modtype = case cn.modtype of {
-      AMod => AMod ;
-      _ => OtherMod }
+    modtype = AMod
     } ;
 
 {-
@@ -317,7 +315,7 @@ concrete NounSom of Noun = CatSom ** open ResSom, Prelude in {
     mod = \\st,n,c =>
             cn.mod ! st ! n ! c
           ++ andConj st cn.modtype  -- If the sentence is already modified, any new modifier needs to be introduced with conjunction
-          ++ np.s ! Abs
+          ++ objpron np ! Abs
           ++ "ah" ;
     modtype = case cn.modtype of {
       AMod => AMod ;