From fd753d4a0e1ce0a39ad615ddd098eacf3e9035b9 Mon Sep 17 00:00:00 2001
From: Karl Knutsson <karl.knutsson@iohk.io>
Date: Tue, 11 Aug 2020 14:24:38 +0200
Subject: [PATCH] Update
 ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs

Co-authored-by: Thomas Winant <thomas@well-typed.com>
---
 .../src/Test/ThreadNet/Network.hs                               | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs b/ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs
index 5a550d000dd..0fb24627d22 100644
--- a/ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs
+++ b/ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs
@@ -913,7 +913,7 @@ runThreadNetwork systemTime ThreadNetworkArgs
                     ChainDB.getCurrentLedger chainDB)
 
       let kaRng = case seed of
-                       Seed s -> mkStdGen s
+                    Seed s -> mkStdGen s
       let nodeArgs = NodeArgs
             { tracers
             , registry