Skip to content

Commit

Permalink
remove dup when type checking all files in the project on startup
Browse files Browse the repository at this point in the history
  • Loading branch information
soulomoon committed Oct 27, 2024
1 parent 0dbbd38 commit c21ce09
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion ghcide/session-loader/Development/IDE/Session.hs
Original file line number Diff line number Diff line change
Expand Up @@ -578,7 +578,7 @@ loadSessionWithOptions recorder SessionLoadingOptions{..} rootDir que = do
-- Typecheck all files in the project on startup
checkProject <- getCheckProject
unless (null new_deps || not checkProject) $ do
cfps' <- liftIO $ filterM (IO.doesFileExist . fromNormalizedFilePath) (concatMap targetLocations all_targets)
cfps' <- liftIO $ filterM (IO.doesFileExist . fromNormalizedFilePath) (nub $ concatMap targetLocations all_targets)

Check warning on line 581 in ghcide/session-loader/Development/IDE/Session.hs

View workflow job for this annotation

GitHub Actions / Hlint check run

Warning in loadSessionWithOptions in module Development.IDE.Session: Use nubOrd ▫︎ Found: "nub" ▫︎ Perhaps: "nubOrd"
void $ shakeEnqueue extras $ mkDelayedAction "InitialLoad" Debug $ void $ do
mmt <- uses GetModificationTime cfps'
let cs_exist = catMaybes (zipWith (<$) cfps' mmt)
Expand Down

0 comments on commit c21ce09

Please sign in to comment.