let get = Configwin_ihm.edit ~with_apply: false ~apply: (fun () -> ())