Refactor
This commit is contained in:
parent
1a1db6944f
commit
305623d53f
|
@ -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
|
||||
|
||||
|
|
Loading…
Reference in New Issue