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