Explicitly import liftIO if you need it, rather than getting it from Shake (#1747)

Author: ndmitchell

ghcide/src/Development/IDE/Core/FileExists.hs

@@ -13,6 +13,7 @@ where
 import           Control.Concurrent.Strict
 import           Control.Exception
 import           Control.Monad.Extra
+import           Control.Monad.IO.Class
 import qualified Data.ByteString                       as BS
 import           Data.HashMap.Strict                   (HashMap)
 import qualified Data.HashMap.Strict                   as HashMap

ghcide/src/Development/IDE/Core/FileStore.hs

@@ -27,6 +27,7 @@ import           Control.Concurrent.STM.TQueue                (writeTQueue)
 import           Control.Concurrent.Strict
 import           Control.Exception
 import           Control.Monad.Extra
+import           Control.Monad.IO.Class
 import qualified Data.ByteString                              as BS
 import           Data.Either.Extra
 import qualified Data.HashMap.Strict                          as HM

ghcide/src/Development/IDE/Core/IdeConfiguration.hs

@@ -14,6 +14,7 @@ where
 
 import           Control.Concurrent.Strict
 import           Control.Monad
+import           Control.Monad.IO.Class
 import           Data.Aeson.Types               (Value)
 import           Data.HashSet                   (HashSet, singleton)
 import           Data.Hashable                  (Hashed, hashed, unhashed)

ghcide/src/Development/IDE/Core/OfInterest.hs

@@ -17,6 +17,7 @@ import           Control.Concurrent.Strict
 import           Control.DeepSeq
 import           Control.Exception
 import           Control.Monad
+import           Control.Monad.IO.Class
 import           Data.Binary
 import           Data.HashMap.Strict                          (HashMap)
 import qualified Data.HashMap.Strict                          as HashMap

ghcide/src/Development/IDE/Plugin/Completions.hs

@@ -10,8 +10,8 @@ module Development.IDE.Plugin.Completions
     ) where
 
 import           Control.Concurrent.Async                     (concurrently)
-import           Control.Monad
 import           Control.Monad.Extra
+import           Control.Monad.IO.Class
 import           Control.Monad.Trans.Maybe
 import           Data.Aeson
 import           Data.List                                    (find)