Make sourcemap generation work for submodules on Windows

This commit is contained in:
mbartlett21 2024-08-30 11:31:39 +10:00
parent 360ceef378
commit b887523da9

View File

@ -315,7 +315,7 @@ moduleNameFromFilePath root filePath =
& reverse
& drop 5 -- .gren
& reverse
& map (\c -> if c == '/' then '.' else c)
& map (\c -> if c == '/' || c == '\\' then '.' else c)
& Name.fromChars
resolvePackagePaths :: Pkg.Name -> PossibleFilePath V.Version -> IO (Pkg.Name, FilePath)