diff --git a/src/StylishHaskell/Step/Imports.hs b/src/StylishHaskell/Step/Imports.hs
--- a/src/StylishHaskell/Step/Imports.hs
+++ b/src/StylishHaskell/Step/Imports.hs
@@ -7,7 +7,7 @@
 
 --------------------------------------------------------------------------------
 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 @@
 --------------------------------------------------------------------------------
 -- | 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
--- 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
diff --git a/tests/StylishHaskell/Step/Imports/Tests.hs b/tests/StylishHaskell/Step/Imports/Tests.hs
--- a/tests/StylishHaskell/Step/Imports/Tests.hs
+++ b/tests/StylishHaskell/Step/Imports/Tests.hs
@@ -34,6 +34,7 @@
     , "import       Data.Map     (lookup, (!), insert, Map)"
     , ""
     , "import Herp.Derp.Internals hiding (foo)"
+    , "import HURR"
     , ""
     , "herp = putStrLn \"import Hello world\""
     ]
@@ -51,6 +52,7 @@
         , "import qualified Data.Map            as M"
         , ""
         , "import           Herp.Derp.Internals hiding (foo)"
+        , "import           HURR"
         , ""
         , "herp = putStrLn \"import Hello world\""
         ]
@@ -68,6 +70,7 @@
         , "import qualified Data.Map      as M"
         , ""
         , "import Herp.Derp.Internals hiding (foo)"
+        , "import HURR"
         , ""
         , "herp = putStrLn \"import Hello world\""
         ]
@@ -85,6 +88,7 @@
         , "import qualified Data.Map as M"
         , ""
         , "import Herp.Derp.Internals hiding (foo)"
+        , "import HURR"
         , ""
         , "herp = putStrLn \"import Hello world\""
         ]