diff --git a/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs b/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs index 479c9db6..f80e48cf 100644 --- a/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs +++ b/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs @@ -69,6 +69,7 @@ tests = testGroup "Language.Haskell.Stylish.Step.Imports.Tests" , testCase "case 35" case35 , testCase "case 36" case36 , testCase "case 37" case37 + , testCase "case 38" case38 ] @@ -923,3 +924,13 @@ case37 = assertSnippet (step Nothing defaultOptions {postQualified = True}) ] [ "import Data.Aeson qualified as JSON (Value, decode, encode)" ] + +-------------------------------------------------------------------------------- +case38 :: Assertion +case38 = assertSnippet (step (Just 80) $ fromImportAlign File) + [ "import HSP" + , "import Happstack.Server" + ] + [ "import Happstack.Server" + , "import HSP" + ]