From 305623d53f3ce23f036e82cd5f587931dab997b0 Mon Sep 17 00:00:00 2001 From: "Niels G. W. Serup" Date: Sat, 21 Sep 2024 20:08:54 +0200 Subject: [PATCH] Refactor --- byg/src/Main.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/byg/src/Main.hs b/byg/src/Main.hs index 5800325..34cec97 100644 --- a/byg/src/Main.hs +++ b/byg/src/Main.hs @@ -1,6 +1,5 @@ module Main where -import Types import ComputationM import Functions @@ -8,7 +7,7 @@ test :: ComputationM () test = do dir <- inject "retter" dirContents <- listDirectory dir - u <- mapComputationM openImage dirContents + _ <- mapComputationM openImage dirContents t <- inject ("hej", "hey.txt") saveFile t