!7

module PreferredShutDownMethod > DynModule {
  transient LS entries = ll("Power Off", "Suspend to RAM", "Suspend to disk", "Never shut down");
  
  visualize {
    ButtonGroup buttonGroup = jradiobuttons(entries);
    selectRadioButton(buttonGroup, indexOfIC(entries, trim(loadTextFile(preferredShutDownMethodFile()))));
    onRadioButtonChange(buttons, voidfunc(int i) {
      saveTextFile(preferredShutDownMethodFile(), get(entries, i))
    });
    ret vstackWithSpacing(buttonsInGroup(buttonGroup));
  }
}