let
simple_get =
Configwin_ihm
.simple_edit
~with_apply:
false
~apply: (
fun
()
->
())