!7

sclass FullScreen extends DynModule {
  transient JButton btn;
  
  JComponent visualize() {
    ret btn = jbutton("Full-Screen On/Off", r switchIt);
  }
  
  void switchIt {
    JDesktopPane desktop = cast get(creator(), 'desktop);
    if (desktop == null) ret;
    Window w = getWindow(desktop);
    if (!isFullScreen(desktop)) {
      showFullScreen(frameTitle(desktop), desktop);
      cleanExitOnFrameClose_ifStillInSameFrame(desktop);
    } else {
      removeFromParent(desktop);
      callCreator('showDesktop);
    }
    
    // Allow closing empty "zombie" windows (why do we have these?)
    final JFrame f = getFrame(desktop);
    onFrameClosing(f, r {
      if (isEmptyFrame(f)) disposeWindow(f);
    });
    
    disposeWindow(w);
  }
}