Commit 93b31968 authored by Michele Alberti's avatar Michele Alberti

[gui] Use actual path of files and not their prettified versions.

parent 0ce4dbfb
......@@ -23,7 +23,7 @@
let add_files (host_window: Design.main_window_extension_points) =
Gtk_helper.source_files_chooser
(host_window :> Gtk_helper.source_files_chooser_host)
(List.map Filepath.Normalized.to_pretty_string (Kernel.Files.get ()))
(Kernel.Files.get () :> string list)
(fun filenames ->
Kernel.Files.set (List.map Datatype.Filepath.of_string filenames);
if Ast.is_computed () then
......
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