Skip to content

Commit d05bb30

Browse files
Update ghcide/src/Development/IDE/Core/FileStore.hs
Co-authored-by: Pepe Iborra <pepeiborra@me.com>
1 parent c5d6cdf commit d05bb30

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

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

+1-1
Original file line numberDiff line numberDiff line change
@@ -294,7 +294,7 @@ setSomethingModified state keys reason = do
294294
fail "setSomethingModified can't be called on this type of VFSHandle"
295295
-- Update database to remove any files that might have been renamed/deleted
296296
atomically $ do
297-
writeTQueue (indexQueue $ hiedbWriter $ shakeExtras state) (\withHieDb -> withHieDb deleteMissingRealFiles)
297+
writeTQueue (indexQueue $ hiedbWriter $ shakeExtras state) ($ deleteMissingRealFiles)
298298
modifyTVar' (dirtyKeys $ shakeExtras state) $ \x ->
299299
foldl' (flip HSet.insert) x keys
300300
void $ restartShakeSession (shakeExtras state) reason []

0 commit comments

Comments
 (0)