前橋です。

tktext.rb の TkTextMark がうまく動きませんでした。パッチです。

--- tktext.rb.org	Tue Jan  6 19:29:42 1998
+++ tktext.rb	Tue Jan  6 19:29:20 1998
@@ -133,3 +133,3 @@
     $tk_text_mark = $tk_text_mark.succ
-    tk_call @t.path, 'set', @id, index
+    tk_call @t.path, 'mark', 'set', @id, index
     @t._addtag id, self
@@ -141,3 +141,3 @@
   def set(where)
-    tk_call @t.path, 'mark', 'unset', @id, where
+    tk_call @t.path, 'mark', 'set', @id, where
   end