From 23f206cf1fa9e4e9398aba47707024368c13ca60 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Fri, 7 Oct 2022 11:38:01 +0200
Subject: Process node record accessor

---
 src/Main.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Main.hs')

diff --git a/src/Main.hs b/src/Main.hs
index 46fdaa6..b19796a 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -203,6 +203,7 @@ spawnOn target pname killWith cmd = do
             , procStdin = hin
             , procOutput = pout
             , procKillWith = killWith
+            , procNode = either (const undefined) id target
             }
 
     let readingLoop :: Handle -> (Text -> TestRun ()) -> TestRun ()
-- 
cgit v1.2.3