Refactor
Šī revīzija ir iekļauta:
		@@ -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
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
		Atsaukties uz šo jaunā problēmā
	
	Block a user