Corrected unused imports and parameters

Author: DavSanchez

src/Haskell/Ide/Engine/Plugin/Ormolu.hs

@@ -4,13 +4,12 @@
 
 module Haskell.Ide.Engine.Plugin.Ormolu ( ormoluDescriptor ) where
 
-import Data.Aeson ( Value ( Null ) )
-import Data.Text
-import Haskell.Ide.Engine.MonadTypes
-
 #if __GLASGOW_HASKELL__ >= 806
 import Control.Exception
 import Control.Monad.IO.Class ( liftIO , MonadIO(..) )
+import Data.Aeson ( Value ( Null ) )
+import Data.Text
+import Haskell.Ide.Engine.MonadTypes
 import Ormolu
 import Ormolu.Config (defaultConfig)
 import Ormolu.Exception (OrmoluException)
@@ -34,16 +33,16 @@ ormoluDescriptor plId = PluginDescriptor
 
 
 provider :: FormattingProvider
-provider contents uri typ _opts =
+provider _contents _uri typ _opts =
   case typ of 
 #if __GLASGOW_HASKELL__ >= 806
     FormatRange _ -> return $ IdeResultFail (IdeError PluginError (pack "Selection formatting for Ormolu is not currently supported.") Null)
-    FormatText -> pluginGetFile contents uri $ \file -> do
-        result <- liftIO $ try @OrmoluException (ormolu defaultConfig file (unpack contents))
+    FormatText -> pluginGetFile _contents _uri $ \file -> do
+        result <- liftIO $ try @OrmoluException (ormolu defaultConfig file (unpack _contents))
         case result of
           Left  err -> return $ IdeResultFail (IdeError PluginError (pack $  "ormoluCmd: " ++ show err) Null)
-          Right new -> return $ IdeResultOk [TextEdit (fullRange contents) new]
+          Right new -> return $ IdeResultOk [TextEdit (fullRange _contents) new]
 #else
     FormatRange _ -> return $ IdeResultOk []
     FormatText -> return $ IdeResultOk []
-#endif 
+#endif