Method: Tk::Itcl::ItclObject#info_function

Defined in:
ext/lib/tkextlib/itcl/incr_tcl.rb

#info_function(*args) ⇒ Object



86
87
88
89
90
91
92
93
94
95
# File 'ext/lib/tkextlib/itcl/incr_tcl.rb', line 86

def info_function(*args)
  if args[-1].kind_of?(Array)
    params = args.pop
    params.each{|param|
      param = param.to_s
      args << ( (param[0] == ?-)? param: "-#{param}" )
    }
  end
  list(tk_call(@path, 'info', 'function', *args))
end