Skip to content
Snippets Groups Projects
Commit 05964774 authored by Virgile Prevosto's avatar Virgile Prevosto
Browse files

[gui] recompute project menu after loading projects

incidentally, this avoids having the phantom duplication of current project
when duplicating a non-current project.
parent d9ae07c6
No related branches found
No related tags found
No related merge requests found
...@@ -274,9 +274,12 @@ let () = ...@@ -274,9 +274,12 @@ let () =
let filter p' = not (Project.equal p p') in let filter p' = not (Project.equal p p') in
recompute ~filter window menu recompute ~filter window menu
in in
let hook () = recompute window menu in
Project.register_create_hook callback_prj; Project.register_create_hook callback_prj;
Project.register_after_set_current_hook ~user_only:true callback_prj; Project.register_after_set_current_hook ~user_only:true callback_prj;
Project.register_before_remove_hook callback_rm_prj; Project.register_before_remove_hook callback_rm_prj;
Project.register_after_load_hook hook;
Project.register_after_global_load_hook hook;
recompute window menu) recompute window menu)
(* (*
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment