Changed UncNegX in ExtraEng to take a Temp rather than Tense and Ant arguments.

1 files changed, 4 insertions, 4 deletions

diff --git a/next-lib/src/english/ExtraEng.gf b/next-lib/src/english/ExtraEng.gf
index fa836cda4..99bdd57eb 100644
--- a/next-lib/src/english/ExtraEng.gf
+++ b/next-lib/src/english/ExtraEng.gf
@@ -35,10 +35,10 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
     ComplVPIVV vv vpi = 
       insertObj (\\a => (if_then_Str vv.isAux [] "to") ++ vpi.s ! VPIInf ! a) (predVV vv) ;
 
-    UncNegCl  t a cl = {s = t.s ++ a.s ++ cl.s ! t.t ! a.a ! neg ! ODir} ;
-    UncNegQCl t a cl = {s = \\q => t.s ++ a.s ++ cl.s ! t.t ! a.a ! neg !q} ;
-    UncNegRCl t a cl = {
-      s = \\r => t.s ++ a.s ++ cl.s ! t.t ! a.a ! neg ! r ;
+    UncNegCl  t cl = {s = t.s ++ cl.s ! t.t ! t.a ! neg ! ODir} ;
+    UncNegQCl t cl = {s = \\q => t.s ++ cl.s ! t.t ! t.a ! neg !q} ;
+    UncNegRCl t cl = {
+      s = \\r => t.s ++ cl.s ! t.t ! t.a ! neg ! r ;
       c = cl.c
       } ;
     UncNegImpSg imp = {s = imp.s ! neg ! ImpF Sg False} ;