Fix stylish-haskell linting

Author: uhbif19

exe/Plugins.hs

@@ -119,7 +119,7 @@ import qualified Ide.Plugin.Brittany               as Brittany
 #endif
 
 #if hindent
-import qualified Ide.Plugin.HIndent               as HIndent
+import qualified Ide.Plugin.HIndent                as HIndent
 #endif
 
 

plugins/hls-hindent-plugin/src/Path/Find.hs

@@ -11,16 +11,17 @@ module Path.Find
   ,findInParents)
   where
 
-import Control.Exception (evaluate)
-import Control.DeepSeq (force)
-import Control.Monad
-import Control.Monad.Catch
-import Control.Monad.IO.Class
-import System.IO.Error (isPermissionError)
-import Data.List
-import Path
-import Path.IO hiding (findFiles)
-import System.PosixCompat.Files (getSymbolicLinkStatus, isSymbolicLink)
+import           Control.DeepSeq          (force)
+import           Control.Exception        (evaluate)
+import           Control.Monad
+import           Control.Monad.Catch
+import           Control.Monad.IO.Class
+import           Data.List
+import           Path
+import           Path.IO                  hiding (findFiles)
+import           System.IO.Error          (isPermissionError)
+import           System.PosixCompat.Files (getSymbolicLinkStatus,
+                                           isSymbolicLink)
 
 -- | Find the location of a file matching the given predicate.
 findFileUp :: (MonadIO m,MonadThrow m)
@@ -95,4 +96,4 @@ findInParents f path = do
             let next = parent path
             if next == path
                 then return Nothing
-                else findInParents f next
+                else findInParents f next

plugins/hls-hindent-plugin/test/Main.hs

@@ -4,22 +4,12 @@ module Main
   ) where
 
 import qualified Ide.Plugin.HIndent as HIndent
-import System.FilePath ( (</>) )
-import Test.Hls
-    ( testGroup,
-      defaultTestRunner,
-      TestName,
-      TestTree,
-      goldenWithHaskellDocFormatter,
-      def,
-      Session,
-      TextDocumentIdentifier,
-      formatDoc,
-      formatRange,
-      Position (..),
-      Range (..),
-      FormattingOptions (..),
-     )
+import           System.FilePath    ((</>))
+import           Test.Hls           (FormattingOptions (..), Position (..),
+                                     Range (..), Session, TestName, TestTree,
+                                     TextDocumentIdentifier, def,
+                                     defaultTestRunner, formatDoc, formatRange,
+                                     goldenWithHaskellDocFormatter, testGroup)
 
 main :: IO ()
 main = defaultTestRunner tests