packages feed

stylish-haskell 0.2.0.1 → 0.2.0.2

raw patch · 3 files changed

+7/−3 lines, 3 files

Files

src/StylishHaskell/Step/Imports.hs view
@@ -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)   --------------------------------------------------------------------------------
stylish-haskell.cabal view
@@ -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
tests/StylishHaskell/Step/Imports/Tests.hs view
@@ -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\""         ]