From 6ceb73bfc1f94f84df0f08795d1cb1edcf331680 Mon Sep 17 00:00:00 2001
From: Daniel Gustafsson <daniel.gustafsson@symbiont.io>
Date: Tue, 29 Mar 2022 10:43:41 +0200
Subject: [PATCH] feat(sut): Remove spoiler in dumblog-demo

The log output when the bug triggers gives a spoiler. Let's show it in the
debugger instead.
---
 src/sut/dumblog/src/Dumblog/Journal/StateMachine.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/sut/dumblog/src/Dumblog/Journal/StateMachine.hs b/src/sut/dumblog/src/Dumblog/Journal/StateMachine.hs
index 5dccd969..b75daf1b 100644
--- a/src/sut/dumblog/src/Dumblog/Journal/StateMachine.hs
+++ b/src/sut/dumblog/src/Dumblog/Journal/StateMachine.hs
@@ -38,7 +38,6 @@ runCommand hasBug logger state@(InMemoryDumblog appLog ix mPeerPort) input =
     ClientRequest req sn -> case req of
       Read i
         | hasBug && ix == 3 -> do
-            logger "Weird reset happend"
             pure (initState, ClientResponse (Error (LBS8.pack "Dumblog!")) sn)
         | i < ix -> pure (state, ClientResponse (OK (index appLog i)) sn)
         | otherwise -> do