From ac4130ca2ef9c4a71bf0faaf5dfc569d629b1cf8 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Thu, 14 Mar 2019 14:57:23 +0100
Subject: [PATCH] (Pes) Fix missing complement for NP as a subject in mkClause

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

diff --git a/src/persian/ResPes.gf b/src/persian/ResPes.gf
index 3b937f27f..ffbae8722 100644
--- a/src/persian/ResPes.gf
+++ b/src/persian/ResPes.gf
@@ -222,7 +222,7 @@ oper
     quest = table
               { ODir => [];
                 OQuest => "آیا" } ;
-    subj = np.s ! Bare ;
+    subj = np2str np ;
     vp = \\ta,p,ord =>
       let vps = clTable vp ! np.a ! ta ! p ;
           vvt = ta2vvt ta ;