Case-insensitive import sorting

Closes #6
haskell · Jun 8, 2012 · 2204fdd · 2204fdd
1 parent 013695a
commit 2204fdd
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/StylishHaskell/Step/Imports.hs b/src/StylishHaskell/Step/Imports.hs
@@ -7,7 +7,7 @@ module StylishHaskell.Step.Imports
 
 --------------------------------------------------------------------------------
 import           Control.Arrow                   ((&&&))
-import           Data.Char                       (isAlpha)
+import           Data.Char                       (isAlpha, toLower)
 import           Data.List                       (sortBy)
 import           Data.Maybe                      (isJust, maybeToList)
 import           Data.Ord                        (comparing)
@@ -62,7 +62,7 @@ groupAdjacent = foldr go []
 --------------------------------------------------------------------------------
 -- | Compare imports for ordering
 compareImports :: H.ImportDecl l -> H.ImportDecl l -> Ordering
-compareImports = comparing (importName &&& H.importQualified)
+compareImports = comparing (map toLower . importName &&& H.importQualified)
 
 
 --------------------------------------------------------------------------------

diff --git a/stylish-haskell.cabal b/stylish-haskell.cabal
@@ -1,5 +1,5 @@
 Name:          stylish-haskell
-Version:       0.2.0.1
+Version:       0.2.0.2
 Synopsis:      Haskell code prettifier
 Homepage:      https://github.com/jaspervdj/stylish-haskell
 License:       BSD3