From c6f6a749b542c67c9ef7203372746d83e5b65600 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Wed, 8 Feb 2023 11:32:47 +0800
Subject: [PATCH] (Eng) uncontracted form for standalone VPS

---
 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 a9cdb3fb4..6ca47c7d7 100644
--- a/src/english/ExtendEng.gf
+++ b/src/english/ExtendEng.gf
@@ -191,7 +191,7 @@ concrete ExtendEng of Extend =
             inf = verb.adv ++ vp.ad ! a ++ verb.fin ++ verb.inf ++ vp.p ++ compl} ;
       } ;
 
-    linVPS : Agr -> {s : Order => Agr => {fin,inf : Str}} -> Str = \agr,vps -> let vpss = vps.s ! ODir True ! agr in vpss.fin ++ vpss.inf ;
+    linVPS : Agr -> {s : Order => Agr => {fin,inf : Str}} -> Str = \agr,vps -> let vpss = vps.s ! ODir False ! agr in vpss.fin ++ vpss.inf ;
 
     mkVPI : VP -> VPI = \vp -> lin VPI {
       s = table {