File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed
ghcide/src/Development/IDE/Core Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -162,7 +162,7 @@ import Ide.Types (DynFlagsModificat
162
162
import qualified Language.LSP.Protocol.Lens as JL
163
163
import Language.LSP.Protocol.Message (SMethod (SMethod_CustomMethod , SMethod_WindowShowMessage ))
164
164
import Language.LSP.Protocol.Types (MessageType (MessageType_Info ),
165
- ShowMessageParams (ShowMessageParams ), normalizedFilePathToUri , uriToNormalizedFilePath )
165
+ ShowMessageParams (ShowMessageParams ), normalizedFilePathToUri , uriToNormalizedFilePath , filePathToUri )
166
166
import Language.LSP.Server (LspT )
167
167
import qualified Language.LSP.Server as LSP
168
168
import Language.LSP.VFS
@@ -990,7 +990,7 @@ setFileCacheHook :: HscEnv -> Action HscEnv
990
990
setFileCacheHook old_hsc_env = do
991
991
#if MIN_VERSION_ghc(9,11,0)
992
992
unlift <- askUnliftIO
993
- return $ old_hsc_env { hsc_FC = (hsc_FC old_hsc_env) { lookupFileCache = unliftIO unlift . use_ GetFileHash . toNormalizedFilePath' } }
993
+ return $ old_hsc_env { hsc_FC = (hsc_FC old_hsc_env) { lookupFileCache = unliftIO unlift . use_ GetFileHash . toNormalizedUri . filePathToUri } }
994
994
#else
995
995
return old_hsc_env
996
996
#endif
You can’t perform that action at this time.
0 commit comments