diff --git a/Language/Haskell/GhcMod/CaseSplit.hs b/Language/Haskell/GhcMod/CaseSplit.hs
index 4bf9588..1db05d7 100644
--- a/Language/Haskell/GhcMod/CaseSplit.hs
+++ b/Language/Haskell/GhcMod/CaseSplit.hs
@@ -47,7 +47,7 @@ splits :: IOish m
        -> Int          -- ^ Column number.
        -> GhcModT m String
 splits file lineNo colNo =
-  ghandle handler $ runGmlT' [Left file] deferErrorsAndHoles $ do
+  ghandle handler $ runGmlT' [Left file] deferErrors $ do
       opt <- options
       crdl <- cradle
       style <- getStyle
diff --git a/Language/Haskell/GhcMod/DynFlags.hs b/Language/Haskell/GhcMod/DynFlags.hs
index aeea699..796dc77 100644
--- a/Language/Haskell/GhcMod/DynFlags.hs
+++ b/Language/Haskell/GhcMod/DynFlags.hs
@@ -99,8 +99,5 @@ setNoMaxRelevantBindings = id
 
 deferErrors :: DynFlags -> Ghc DynFlags
 deferErrors df = return $
-  Gap.setWarnTypedHoles $ Gap.setDeferTypeErrors $ setNoWarningFlags df
-
-deferErrorsAndHoles :: DynFlags -> Ghc DynFlags
-deferErrorsAndHoles df = return $
-  Gap.setDeferTypeErrors $ Gap.setDeferTypedHoles $ setNoWarningFlags df
+  Gap.setWarnTypedHoles $ Gap.setDeferTypedHoles $
+  Gap.setDeferTypeErrors $ setNoWarningFlags df
diff --git a/Language/Haskell/GhcMod/Gap.hs b/Language/Haskell/GhcMod/Gap.hs
index 511f0bc..41a10ae 100644
--- a/Language/Haskell/GhcMod/Gap.hs
+++ b/Language/Haskell/GhcMod/Gap.hs
@@ -296,7 +296,7 @@ setDeferTypeErrors = id
 #endif
 
 setDeferTypedHoles :: DynFlags -> DynFlags
-#if __GLASGOW_HASKELL__ >= 708
+#if __GLASGOW_HASKELL__ >= 710
 setDeferTypedHoles dflag = gopt_set dflag Opt_DeferTypedHoles
 #else
 setDeferTypedHoles = id