$text->bind('<Control-r>',sub{$ec->kill_command });