diff --git a/ext/tk/sample/tktextio.rb b/ext/tk/sample/tktextio.rb
index 552589287b..5b6bb9cc5f 100644
--- a/ext/tk/sample/tktextio.rb
+++ b/ext/tk/sample/tktextio.rb
@@ -421,7 +421,7 @@ class TkTextIO < TkText
     nil
   end
   def close_write
-    @open[:w] = false if @opne[:w]
+    @open[:w] = false if @open[:w]
     nil
   end