sclass JNavigation extends JPanel {
  JList list;
  SingleComponentPanel scp;
  Map<S, F0<JComponent>> contentMakers = synchroMap();
  S lastItem = "";
  bool autoOpenFirstPage = true;

  *() {
    list = jlist();
    scp = singleComponentPanel();
    makeFakeSingleComponentPanel(this, jhsplit(list, scp));
    onSelectionChangedAndNow(list, voidfunc(S item) {
      if (eq(item, lastItem)) ret;
      lastItem = item;
      JComponent content = pcallF(contentMakers.get(item));
      if (content == null) content = jcenteredimage(#1101244);
      scp.setComponent(content);
    });
  }
  
  void addPage(fS name, JComponent content) {
    addPage(name, f0_const(content));
  }
  
  void addPageOnTop(fS name, final F0<JComponent> makeContent) {
    swing {
      contentMakers.put(name, makeContent);
      insertListItem(list, 0, name);
      if (jlistSize(list) == 1) setSelectedIndex(list, 0);
    }
  }
  
  void addPage(fS name, final F0<JComponent> makeContent) {
    swing {
      contentMakers.put(name, makeContent);
      addListItem(list, name);
      if (jlistSize(list) == 1) setSelectedIndex(list, 0);
    }
  }
}