From 6bc2b3506c242de780d5a655db811cee0850d6fb Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Thu, 28 Feb 2019 17:17:26 +0100
Subject: [PATCH] (Pes) Fix a bug: defective verbs don't have an imperfect
 prefix

---
 src/persian/MorphoPes.gf | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/persian/MorphoPes.gf b/src/persian/MorphoPes.gf
index 5a9d26a4..af5d6e63 100644
--- a/src/persian/MorphoPes.gf
+++ b/src/persian/MorphoPes.gf
@@ -194,6 +194,7 @@ oper
   defectiveVerb : (inf,pres,past : Str) -> Verb = \bayestan,bayad,bayest ->
     let invReg = mkVerb bayestan bayad in invReg **
       {s = \\vf => case vf of {
+            ImpPrefix _ => [] ;
             VAor  pol _ => addN pol bayad ;
             VImp  pol _ => addN pol bayad ;
             VSubj pol _ => addN pol bayad ;