Put function shortcuts back in Functions module

byg/src/Main.hs

@@ -2,13 +2,15 @@ module Main where
 
 import Types
 import ComputationM
+import Functions
 
 test :: ComputationM ()
 test = do
   dir <- inject "retter"
   dirContents <- listDirectory dir
   u <- mapComputationM openImage dirContents
-  pure $ NoToken
+  t <- inject ("hej", "hey.txt")
+  saveFile t
 
 main :: IO ()
 main = mapM_ print $ evalComputationM test