!7

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