Commit 31bddc42 authored by Herbert Valerio Riedel's avatar Herbert Valerio Riedel 🕺

Add missing whitespace in toArgs' error msg

Differential Revision: https://phabricator.haskell.org/D1591
parent 7997d6c0
......@@ -868,7 +868,7 @@ toArgs str
| all isSpace spaces ->
Right args
_ ->
Left ("Couldn't read " ++ show str ++ "as [String]")
Left ("Couldn't read " ++ show str ++ " as [String]")
s -> toArgs' s
where
toArgs' :: String -> Either String [String]
......@@ -899,7 +899,7 @@ toArgs str
| all isSpace (take 1 rest) ->
Right (arg, rest)
_ ->
Left ("Couldn't read " ++ show s ++ "as String")
Left ("Couldn't read " ++ show s ++ " as String")
{-
-- -----------------------------------------------------------------------------
-- Floats
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment