class Tk::Tcllib::Swaplist_Dialog