class Tk::Text::Peer