GHC 9.12 compat: ErrorCallWithLocation got deprecated

ulysses4ever · Dec 24, 2024 · edee335 · edee335
1 parent 9a04d05
commit edee335
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cabal-install/src/Distribution/Client/FileMonitor.hs b/cabal-install/src/Distribution/Client/FileMonitor.hs
@@ -1121,7 +1121,7 @@ checkDirectoryModificationTime dir mtime =
 handleErrorCall :: a -> IO a -> IO a
 handleErrorCall e = handle handler
   where
-    handler (ErrorCallWithLocation _ _) = return e
+    handler (ErrorCall _) = return e
 
 -- | Run an IO computation, returning @e@ if there is any 'IOException'.
 --