remove debug

This commit is contained in:
Joey Hess 2013-12-10 12:43:42 -04:00
parent 2c7c07286c
commit 902d14b2ee

View file

@ -113,7 +113,6 @@ getOutput c ps environ = do
putStrLn $ unwords [c, show ps]
out@(s, ok) <- processTranscript' c ps environ Nothing
putStrLn $ unwords [c, "finished", show ok, "output size:", show (length s)]
writeFile (c ++ ".out") s
return out
atFile :: FilePath -> String