summaryrefslogtreecommitdiffhomepage
path: root/lib/Language/Haskell/Stylish/Step/Imports.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Language/Haskell/Stylish/Step/Imports.hs')
-rw-r--r--lib/Language/Haskell/Stylish/Step/Imports.hs7
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