Код, конечно, не весь, но, вроде, должно быть понятно. Есть ttk::notebook, хочется добавлять/удалять вкладки:

ttk::notebook .nb

proc add_tab {} {
  set tab_cnt [.nb index end]
  .nb add [frame .nb.fr$tab_cnt]
}

proc del_tab {} {
  set tab_no [expr [.nb index end] - 1]
  .nb forget .nb.fr$tab_no
}

Последняя вкладка удаляется, как и было задумано, но при попытке добавить новую, получаю

window name «fr0» already exists in parent

Как правильно удалить вкладку?