Method: TclTk._callcallback

Defined in:
lib/tcltk.rb

._callcallback(key, arg) ⇒ Object

TclTk._callcallback(key, arg): invoke registered callback

key: key to select callback (to_s value of the TclTkCallback)
arg: parameter from tcl/tk interpreter


61
62
63
64
65
66
67
# File 'lib/tcltk.rb', line 61

def TclTk._callcallback(key, arg)
  print("_callcallback: ", @callback[key].inspect, "\n") if $DEBUG
  @callback[key]._call(arg)
  # throw out callback value
  # should return String to satisfy rb_eval_string()
  return ""
end