require "tk"

a = TkText.new{pack}

Thread.start do
　while line = gets
　　a.insert 'end', line
　end
end

Tk.mainloop

上のプログラム実行中、Tk のテキストウィジェット内の文字列を
マウスでドラッグして選択すると、それ以降 gets が
入力を取りこぼしてしまうようです。
（普段 state 'disable' しておいて書き込み時のみ 'normal' にしても同じ）
どのように書けばいいでしょうか？