Skip to content
Snippets Groups Projects
Commit b790ebab authored by erwan's avatar erwan
Browse files

fix: hide the priority grid in synchronous mode of rdbgui4sasa

parent e578b529
No related branches found
No related tags found
No related merge requests found
(* Time-stamp: <modified the 04/01/2023 (at 11:44) by Erwan Jahier> *) (* Time-stamp: <modified the 04/01/2023 (at 11:56) by Erwan Jahier> *)
#thread #thread
#require "lablgtk3" #require "lablgtk3"
...@@ -418,11 +418,13 @@ let custom_daemon p gtext vbox step_button back_step_button round_button ...@@ -418,11 +418,13 @@ let custom_daemon p gtext vbox step_button back_step_button round_button
pushbox#set_sensitive enabled pushbox#set_sensitive enabled
| Synchronous | Distributed | Central | LocCentral -> | Synchronous | Distributed | Central | LocCentral ->
if !daemon_kind = Synchronous then show undo_button if !daemon_kind = Synchronous then (
else hide undo_button; show undo_button; hide counter_grid
) else (
hide undo_button; show counter_grid
);
(match !oracle_button_ref with Some b -> show b | None -> ()); (match !oracle_button_ref with Some b -> show b | None -> ());
show back_step_button; show step_button; show round_button; show back_step_button; show step_button; show round_button;
show counter_grid;
if not args.salut_mode then show legitimate_button; (* for the time being *) if not args.salut_mode then show legitimate_button; (* for the time being *)
hide checkbox_grid; hide pushbox_grid; hide checkbox_grid; hide pushbox_grid;
in in
......
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