Commit bee34c79 authored by Michele Alberti's avatar Michele Alberti
Browse files

[Server] Normalize the file names.

parent 93d1c5d3
......@@ -130,6 +130,9 @@ let () =
~page ~name:"kernel.project.getSourceFileNames"
~descr:(Md.plain "Get the source file names of the current project")
~input:(module Junit) ~output:(module Jstring.Jlist)
Kernel.Files.get
(fun () ->
List.map
(fun fname -> (Filepath.Normalized.of_string fname :> string))
(Kernel.Files.get ()))
(* -------------------------------------------------------------------------- *)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment