diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-12-07 11:18:02 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-12-07 11:18:02 -0400 |
| commit | 52fa716a498ebbd3074011eb179658c135378ff3 (patch) | |
| tree | 97a5195c431a8c2f593885dfb8518272e98b0ecb | |
| parent | d515f7e02def55a48126b4696026a22c00992ccf (diff) | |
typo
| -rw-r--r-- | Build/EvilLinker.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Build/EvilLinker.hs b/Build/EvilLinker.hs index a6176754c..f852b8119 100644 --- a/Build/EvilLinker.hs +++ b/Build/EvilLinker.hs @@ -114,7 +114,7 @@ getOutput :: String -> [String] -> Maybe [(String, String)] -> IO (String, Bool) getOutput cmd params env = do putStrLn $ unwords [cmd, show params] out@(s, ok) <- processTranscript' cmd params env Nothing - putStrLn $ unwords [cmd, "finished", show ok, "output size:", length s] + putStrLn $ unwords [cmd, "finished", show ok, "output size:", show (length s)] return out runParser' :: Parser a -> String -> String -> a |