fix ghc 9.2

Author: soulomoon

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

@@ -120,7 +120,7 @@ modifyFileExists state changes = do
     -- flush previous values
     let (fileModifChanges, fileExistChanges) =
             partition ((== FileChangeType_Changed) . snd) changes
-    keys0 <- foldMap (deleteValue (shakeExtras state) GetFileExists . fst) fileExistChanges
+    keys0 <- concat <$> mapM (deleteValue (shakeExtras state) GetFileExists . fst) fileExistChanges
     let keys1 = map (toKey GetFileExists . fst) fileExistChanges
     let keys2 = map (toKey GetModificationTime . fst) fileModifChanges
     return (keys0 <> keys1 <> keys2)