diff --git a/ChangeLog b/ChangeLog
index c695032a87..1657881b26 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Fri Nov  5 13:22:58 2004  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tk/lib/tk/text.rb: sorry. bug fix again.
+
 Fri Nov  5 13:17:54 2004  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
 
 	* ext/tk/lib/tk/text.rb: bug fix
diff --git a/ext/tk/lib/tk/text.rb b/ext/tk/lib/tk/text.rb
index 158d5461ef..efede9861f 100644
--- a/ext/tk/lib/tk/text.rb
+++ b/ext/tk/lib/tk/text.rb
@@ -84,7 +84,7 @@ class TkText<TkTextWin
 
   def __destroy_hook__
     TkTextTag::TTagID_TBL.delete(@path)
-    TkTextTag::TMarkID_TBL.delete(@path)
+    TkTextMark::TMarkID_TBL.delete(@path)
   end
 
   def create_self(keys)