summaryrefslogtreecommitdiff
path: root/ext/tk/lib/tkextlib/itk/incr_tk.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/lib/tkextlib/itk/incr_tk.rb')
-rw-r--r--ext/tk/lib/tkextlib/itk/incr_tk.rb6
1 files changed, 4 insertions, 2 deletions
diff --git a/ext/tk/lib/tkextlib/itk/incr_tk.rb b/ext/tk/lib/tkextlib/itk/incr_tk.rb
index 106ffa3519..1d80e1cd6b 100644
--- a/ext/tk/lib/tkextlib/itk/incr_tk.rb
+++ b/ext/tk/lib/tkextlib/itk/incr_tk.rb
@@ -350,7 +350,8 @@ module Tk
fail RuntimeError, 'component is not assigned to a widget'
end
end
- if args[0].kind_of?(Proc) || args[0].kind_of?(Method)
+ # if args[0].kind_of?(Proc) || args[0].kind_of?(Method)
+ if TkComm._callback_entry?(args[0])
cmd = args.shift
else
cmd = Proc.new
@@ -378,7 +379,8 @@ module Tk
fail RuntimeError, 'component is not assigned to a widget'
end
end
- if args[0].kind_of?(Proc) || args[0].kind_of?(Method)
+ # if args[0].kind_of?(Proc) || args[0].kind_of?(Method)
+ if TkComm._callback_entry?(args[0])
cmd = args.shift
else
cmd = Proc.new