diff options
author | Moritz Drexl <mdrexl@fastmail.fm> | 2016-12-28 18:12:08 +0100 |
---|---|---|
committer | Moritz Drexl <mdrexl@fastmail.fm> | 2016-12-28 18:12:08 +0100 |
commit | 8c27fc3298bcb7f11e0dd5df498efd3ba83e6d87 (patch) | |
tree | 41bba5630ba565d4acaefd72bf7d2b3078c41acc /lib | |
parent | 3d3865a4e605ca9a1ceacdcdab6c19df17de0079 (diff) | |
download | stylish-haskell-8c27fc3298bcb7f11e0dd5df498efd3ba83e6d87.tar.gz |
reduce unnecessary spaces
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Language/Haskell/Stylish/Step/Imports.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/Language/Haskell/Stylish/Step/Imports.hs b/lib/Language/Haskell/Stylish/Step/Imports.hs index 08918ae..29b8cc2 100644 --- a/lib/Language/Haskell/Stylish/Step/Imports.hs +++ b/lib/Language/Haskell/Stylish/Step/Imports.hs @@ -261,7 +261,12 @@ prettyImport columns Options{..} padQualified padName longest imp qualified | H.importQualified imp = ["qualified"] - | padQualified = [" "] + | padQualified = + if H.importSrc imp + then [] + else if H.importSafe imp + then [" "] + else [" "] | otherwise = [] safe |