The namespace isn't needed here, I guess

kadena-io · Nov 27, 2023 · 4a3bad5 · 4a3bad5
1 parent 0e42d17
commit 4a3bad5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/pact-core/Pact/Core/Compile.hs b/pact-core/Pact/Core/Compile.hs
@@ -102,7 +102,7 @@ evalModuleGovernance interp tl = do
       lookupModule (Lisp._mInfo m) pdb mname >>= \case
         Just targetModule -> do
           term <- case _mGovernance targetModule of
-            KeyGov (KeySetName ksn) -> do
+            KeyGov (KeySetName ksn _mNs) -> do
               let ksnTerm = Constant (LString ksn) info
                   ksrg = App (Builtin (liftRaw RawKeysetRefGuard) info) (pure ksnTerm) info
                   term = App (Builtin (liftRaw RawEnforceGuard) info) (pure ksrg) info