From 784c661d8d9876c575edb484d60d8ed1a5301791 Mon Sep 17 00:00:00 2001
From: Edmund Noble <edmundnoble@gmail.com>
Date: Wed, 21 Feb 2024 20:24:02 -0500
Subject: [PATCH] Stop forking

---
 src/Pact/Runtime/Capabilities.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/Pact/Runtime/Capabilities.hs b/src/Pact/Runtime/Capabilities.hs
index bb986848f..7a887f0bc 100644
--- a/src/Pact/Runtime/Capabilities.hs
+++ b/src/Pact/Runtime/Capabilities.hs
@@ -282,9 +282,7 @@ checkSigCaps sigs = go
         eligibleCaps
           | null capsBeingEvaluated = getAllStackCaps
           | otherwise = return capsBeingEvaluated
-      granted <- ifExecutionFlagSet FlagDisablePact410
-        getAllStackCaps
-        eligibleCaps
+      granted <- eligibleCaps
       autos <- use $ evalCapabilities . capAutonomous
       return $ M.filter (match (S.null autos) granted) sigs