Lines Matching +refs:pkg +refs:create
47 if [string equal [lrange $args 0 1] {element create}] {
52 # return [eval [concat [list ::style element create [lindex $args 2] image [lindex $spec 0] -map $map] [lrange $args 5 end]]]
53 return [uplevel 1 [list ::style element create [lindex $args 2] image [lindex $spec 0] -map $map] [lrange $args 5 end]]
75 if [string equal [lrange $args 0 1] {element create}] {
80 # return [eval [concat [list ::style element create [lindex $args 2] image [lindex $spec 0] -map $map] [lrange $args 5 end]]]
81 return [uplevel 1 [list ::style element create [lindex $args 2] image [lindex $spec 0] -map $map] [lrange $args 5 end]]]
108 if [string equal [lrange $args 0 1] {element create}] {
114 # return [eval [concat [list ::ttk::style element create [lindex $args 2] image [concat $name [lindex $opts [expr $idx + 1]]]] [lreplace $opts $idx [expr $idx + 1]]]]
115 return [uplevel 1 [list ::ttk::style element create [lindex $args 2] image [concat $name [lindex $opts [expr $idx + 1]]]] [lreplace $opts $idx [expr $idx + 1]]]
133 foreach pkg [lsearch -inline -all -glob [package names] ttk::theme::$ptn] {
134 set theme [namespace tail $pkg]
139 foreach pkg [lsearch -inline -all -glob [package names] tile::theme::$ptn] {
140 set theme [namespace tail $pkg]
239 tk_call(TkCommandNames[0], 'element', 'create', name, type, *args)
259 'element', 'create', name, 'image', spec, opts)
261 tk_call(TkCommandNames[0], 'element', 'create', name, 'image', spec)
268 'element', 'create', name, 'image', base, opts)
277 'element', 'create', name, 'image', spec, opts)
279 tk_call(TkCommandNames[0], 'element', 'create', name, 'image', spec)
298 tk_call(TkCommandNames[0], 'element', 'create', name, 'vsapi',
313 tk_call(TkCommandNames[0], 'theme', 'create', name, *hash_kv(keys))
315 tk_call(TkCommandNames[0], 'theme', 'create', name)