diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-09-20 08:44:40 +0900 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-09-20 08:44:40 +0900 |
| commit | 34ec8bc060b0f96962eeeaf15823e8af6df5177e (patch) | |
| tree | c2821f082c995a1dd00cfda2a446c229cacfc7cf | |
| parent | cc63dc3688d1136937c5e0dfd8747a686bdafc8c (diff) | |
| download | stylish-haskell-34ec8bc060b0f96962eeeaf15823e8af6df5177e.tar.gz | |
Dont throw away PackageImports
| -rw-r--r-- | src/Language/Haskell/Stylish/Step/Imports.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Language/Haskell/Stylish/Step/Imports.hs b/src/Language/Haskell/Stylish/Step/Imports.hs index 9699627..fc14256 100644 --- a/src/Language/Haskell/Stylish/Step/Imports.hs +++ b/src/Language/Haskell/Stylish/Step/Imports.hs @@ -122,6 +122,7 @@ prettyImport columns padQualified padName longest imp = base = unwords $ concat [ ["import"] , qualified + , (fmap show $ maybeToList $ H.importPkg imp) , [(if hasExtras && padName then padRight longest else id) (importName imp)] , ["as " ++ as | H.ModuleName _ as <- maybeToList $ H.importAs imp] |