diff --git a/test/unit/Chainweb/Test/Pact5/TransactionExecTest.hs b/test/unit/Chainweb/Test/Pact5/TransactionExecTest.hs
index f93038fde..cdf43a9d4 100644
--- a/test/unit/Chainweb/Test/Pact5/TransactionExecTest.hs
+++ b/test/unit/Chainweb/Test/Pact5/TransactionExecTest.hs
@@ -689,7 +689,8 @@ applyCmdCoinTransfer rdb = readFromAfterGenesis v rdb $ do
         e <- applyCmd logger (Just logger) pactDb txCtx (TxBlockIdx 0) noSPVSupport (Gas 1) (view payloadObj <$> cmd)
         e & P.match _Right
             ? P.checkAll
-                [ P.fun _crEvents ? P.list
+                [ P.fun _crResult ? P.equals ? PactResultOk (PString "Write succeeded")
+                , P.fun _crEvents ? P.list
                     -- transfer event and gas redeem event
                     [ event
                         (P.equals "TRANSFER")
@@ -700,7 +701,6 @@ applyCmdCoinTransfer rdb = readFromAfterGenesis v rdb $ do
                         (P.equals [PString "sender00", PString "NoMiner", PDecimal 22.7])
                         (P.equals coinModuleName)
                     ]
-                , P.fun _crResult ? P.equals ? PactResultOk (PString "Write succeeded")
                 -- reflects buyGas gas usage, as well as that of the payload
                 , P.fun _crGas ? P.equals ? Gas expectedGasConsumed
                 , P.fun _crContinuation ? P.equals ? Nothing