From 310e143bea245c7b44ba89452507b729f4dadb77 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Tue, 4 May 2021 12:16:19 +0800
Subject: [PATCH] (Eng) Add back the s fields of Temp and Pol in mkVPS

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

diff --git a/src/english/ExtendEng.gf b/src/english/ExtendEng.gf
index 3418dcf9..820a05b9 100644
--- a/src/english/ExtendEng.gf
+++ b/src/english/ExtendEng.gf
@@ -177,7 +177,7 @@ concrete ExtendEng of Extend =
         let
           verb = vp.s ! t.t ! t.a ! p.p ! o ! a ; -- choice of Order determines aux or not
           compl = vp.s2 ! a ++ vp.ext
-        in {fin = verb.aux ;
+        in {fin = verb.aux ++ t.s ++ p.s ;
             inf = verb.adv ++ vp.ad ! a ++ verb.fin ++ verb.inf ++ vp.p ++ compl} ;
       } ;