!7

p-subst {
  showSuggestion("Run program #123 - bla bla blubb blubb?", r {
    infoBox("Yo")
  });
}

// runs action in new thread
svoid showSuggestion(S suggestionText, fO action) {
  final JTextPane tp = jcenteredTextPane();
  //makeUneditable(tp);
  setFontSize(20, tp);
  swing { tp.setCharacterAttributes(style_foreground(Color.black), false); }
  setText(tp, suggestionText);
  
  //alwaysOnTop(showWindowInBottomRightCorner(
  showPackedFrameInBottomRightCorner(
    withLineBorder(Color.black, withMargin(
      centerAndSouth(
        tp,
        withTopMargin(jcenteredbutton("OK", r {
          disposeWindow();
          callFInNewThread(action);
        }))))));
}