Fix missing whitespace in hsimport.hs prettyPrint String

2016-04-19 21:05:52 +02:00
parent a61b409486
commit 02f04d92f3
1 changed files with 1 additions and 1 deletions
--- a/hacking/hsimport.hs
+++ b/hacking/hsimport.hs
@@ -8,7 +8,7 @@ main = hsimport $ defaultConfig { prettyPrint = prettyPrint
   where
      prettyPrint :: HS.ImportDecl -> String
      prettyPrint (HS.ImportDecl sloc modname qual _ _ mpkg mas mspec) =
-        "import " ++ (ifStr qual "qualified") ++
+        "import " ++ (ifStr qual "qualified ") ++
        (maybe "" (\pkg -> " \"" ++ pkg ++ "\" ") mpkg)  ++
        getMN modname ++ (maybe "" (\name -> " as " ++ getMN name) $ mas) ++
        specprint mspec