/macosx-10.10/ruby-106/ruby/ext/tk/lib/tkextlib/tcllib/ |
H A D | style.rb | 2 # tkextlib/tcllib/style.rb 6 # * select and use some 'style' of option (resource) DB 14 PACKAGE_NAME = 'style'.freeze 21 TkPackage.require('style') 28 fail RuntimeError, "'tkextlib/tcllib/style' extension is not available on your current environment." 31 def self.names singleton method in class:Tk.Style 35 def self.use(style) 41 # TkPackage.require('style', '0.1') 42 # TkPackage.require('style', '0.3') 43 TkPackage.require('style') 53 def self.names singleton method in class:Style [all...] |
/macosx-10.10/ruby-106/ruby/ext/tk/lib/tkextlib/tile/ |
H A D | style.rb | 2 # style commands 21 TkCommandNames = ['style'.freeze].freeze 24 # On Ttk (Tile) extension, 'style' command has imcompatible changes 31 # on the Tcl/Tk interpreter to work with different version of style 38 unless Tk.info(:commands, '::ttk::style').empty? 40 # "can't define '::ttk::style' command (already exist)" 43 warn "Warning: can't define '::ttk::style' command (already exist)" if $DEBUG 46 TkCore::INTERP.add_tk_procs('::ttk::style', 'args', <<-'EOS') 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 elemen [all...] |
/macosx-10.10/tcl-105/tcl_ext/tktreectrl/tktreectrl/demos/ |
H A D | style-editor.tcl | 1 # RCS: @(#) $Id: style-editor.tcl,v 1.16 2007/01/21 22:58:57 treectrl Exp $ 100 # Create a new treectrl to copy the states/style/elements into, so I don't 136 if {[llength [$T style names]] == 0} { 141 $T style create s1 142 $T style elements s1 {e2 e1} 143 $T style layout s1 e2 -union [list e1] -ipadx 2 -ipady 2 -iexpand e 151 # One item for each style in the demo list 152 foreach style [lsort -dictionary [$Tdemo style name [all...] |
H A D | mycomputer.tcl | 8 if {[lsearch -exact [font names] DemoMyComputerHeaderFont] == -1} { 49 set S [$T style create styHeader -orient vertical] 50 $T style elements $S {txtHeader rectDivider} 51 $T style layout $S txtHeader -padx 10 -pady {10 0} -expand ns 52 $T style layout $S rectDivider -pady {2 8} 55 set S [$T style create styName -orient horizontal] 56 $T style elements $S {elemRectSel txtName} 57 $T style layout $S txtName -padx {16 0} -squeeze x -expand ns 58 $T style layout $S elemRectSel -union [list txtName] -ipadx 2 -pady 1 -iexpand ns 61 set S [$T style creat [all...] |
H A D | demo.tcl | 32 if {[lsearch [image names] $pattern] == -1} { 149 if {[ttk::style layout TreeCtrl] ne ""} { 157 namespace export style 162 namespace import ::style 323 foreach theme [lsort -dictionary [ttk::style theme names]] { 367 set S [$T style create s1] 368 $T style elements $S {e3 e1} 369 $T style layout $S e3 -union [list e1] -ipadx 1 -ipady {0 1} 371 set S [$T style creat [all...] |
H A D | firefox.tcl | 26 if {[lsearch -exact [image names] arrow-up] == -1} { 82 set S [$T style create styCategory -orient horizontal] 83 $T style elements $S {eRectTop eText1 eWindow} 84 $T style layout $S eRectTop -detach yes -indent no -iexpand xy -draw {yes open no {}} 86 $T style layout $S eText1 -expand ns -iexpand x -sticky w 87 $T style layout $S eWindow -expand ns -padx 10 -pady 6 89 set S [$T style create styFrame -orient horizontal] 90 $T style elements $S {eRectBottom eWindow} 91 $T style layout $S eRectBottom -detach yes -indent no -iexpand xy 92 $T style layou [all...] |
/macosx-10.10/tcl-105/tcl_ext/tklib/tklib/modules/chatwidget/ |
H A D | chatwidget.tcl | 5 # for displaying user names, chat text and for entering new comments. 23 ttk::style layout ChatwidgetFrame { 28 if {[lsearch -exact [font names] ChatwidgetFont] == -1} { 72 names { 258 # state(names) {{pat -color red -group admin -thing wilf} {eric ....}} 265 return $state(names) 268 foreach item $state(names) { lappend r [lindex $item 0] } 279 if {[set ndx [lsearch -exact -index 0 $state(names) $nick]] == -1} { 282 lappend state(names) [linsert [array get opts] 0 $nick] 284 array set opts [lrange [lindex $state(names) [all...] |
/macosx-10.10/tcl-105/tcl_ext/bwidget/bwidget/ |
H A D | themeutils.tcl | 41 # - Themed color declarations and names do not follow a strict rule, 90 set colors(style) default 95 style "default" \ 110 # -style default / native / myFavoriteStyleName 112 # | | specify a valid style name, 127 # the underlying style, activate this option! 129 # -themedirs {} = default / a list of valid directory names, 136 array set p { -package "" -style "" -setoptdb 0 -themedirs "" } 170 # -- style: 171 if { [string length $p(-style)] > [all...] |
H A D | buttonbox.tcl | 33 {-style String "" 0} 40 Widget::addmap Button "" :cmd {-style {}} 151 set style active 153 set style disabled 155 set style normal 170 $args [list -default $style] 174 $but configure -style [Button::getSlimButtonStyle] 322 lappend names [$w cget -name] 324 set res [lsearch -exact [concat $names $text] $index] 346 foreach tag [array names dat [all...] |
/macosx-10.10/tcl-105/tcl/tcl/unix/ |
H A D | installManPage | 20 -s Use symbolic links for manpages with multiple names. 24 Option names may not be combined getopt-style. 56 # A sed script to parse the alternative names out of a man page. 79 echo "warning: no target names found in $ManPage"
|
/macosx-10.10/tcl-105/tk/tk/unix/ |
H A D | installManPage | 20 -s Use symbolic links for manpages with multiple names. 24 Option names may not be combined getopt-style. 56 # A sed script to parse the alternative names out of a man page. 79 echo "warning: no target names found in $ManPage"
|
/macosx-10.10/tcl-105/tk/tk/library/ttk/ |
H A D | ttk.tcl | 58 # Called from [::ttk::style theme use]. 81 foreach pkg [lsearch -inline -all -glob [package names] ttk::theme::$ptn] { 92 variable currentTheme ;# @@@ Temp -- [::ttk::style theme use] doesn't work 93 if {$theme ni [::ttk::style theme names]} { 96 ::ttk::style theme use $theme 129 set builtinThemes [style theme names]
|
/macosx-10.10/tcl-105/tcl_ext/tcllib/tcllib/modules/bench/ |
H A D | bench_wtext.tcl | 51 set ipkeys [array names DATA interp*] 65 foreach key [lsort -dict -index 1 [array names DATA desc*]] { 138 set r [report::report r [$m columns] style captionedtable]
|
/macosx-10.10/tidy-15.15/tidy/src/ |
H A D | clean.c | 20 style properties on the element, e.g. 22 <p><b>...</b></p> -> <p style="font-weight: bold">...</p> 27 a style attribute with one or more properties. 30 it by style properties on the contents, e.g. 32 <dir><li><p>...</li></dir> -> <p style="margin-left 1em">... 39 style attribute by a class value and style rule in the 41 and class names is built. 139 Create sorted linked list of properties from style string 145 static StyleProp* CreateProps( StyleProp* prop, ctmbstr style ) 213 tmbstr style, p, s; local 277 TagStyle *style, *next; local 303 TagStyle* style; local 514 TagStyle *style; local 695 tmbstr s1, s2, names; local 740 tmbstr s1, s2, style; local 1333 AttVal *av, *style, *next; local [all...] |
/macosx-10.10/tcl-105/tcl_ext/tklib/tklib/modules/widget/ |
H A D | mentry.tcl | 102 style theme settings "default" { 103 style layout MenuEntry { 112 style element create MenuEntry.icon image $img \ 118 foreach theme [style theme names] { 119 style theme settings $theme { 121 #style map MenuEntry -image [list disabled $img] 138 installhull using ttk::entry -style MenuEntry
|
H A D | dateentry.tcl | 89 style theme settings "default" { 90 style layout dateentry { 99 style element create dateentry.icon image $dateimg \ 105 foreach theme [style theme names] { 106 style theme settings $theme { 108 #style map dateentry -image [list disabled $img] 138 installhull using ttk::entry -style dateentry 171 tk::unsupported::MacWindowStyle style $dropbox \
|
/macosx-10.10/tcl-105/tcl_ext/tktreectrl/tktreectrl/library/ |
H A D | filelist-bindings.tcl | 120 if {[$T item style set $item $C] ne $S} continue 269 if {[$T item style set $item $sC] ne $sS} continue 308 if {[$T item style set $I $C] eq $S} { 345 if {0 && [$T dragimage cget -style] ne ""} { 420 set S [$T item style set $I $C] 471 set S [$T item style set $I $C] 472 set padx [$T style layout $S $E -padx] 478 foreach E2 [$T style elements $S] { 479 if {[lsearch -exact [$T style layout $S $E2 -union] $E] == -1} continue 481 set pad [$T style layou [all...] |
/macosx-10.10/tcl-105/tk/tk/library/ |
H A D | msgbox.tcl | 181 set names [list abort retry ignore] 186 set names [list ok] 191 set names [list ok cancel] 196 set names [list retry cancel] 201 set names [list yes no] 206 set names [list yes no cancel] 218 foreach name $names lab $labels { 250 set bg [ttk::style lookup . -background] 273 ::tk::unsupported::MacWindowStyle style $w moveableModal {}
|
/macosx-10.10/tcl-105/tk84/tk/library/ |
H A D | msgbox.tcl | 180 set names [list abort retry ignore] 184 set names [list ok] 188 set names [list ok cancel] 192 set names [list retry cancel] 196 set names [list yes no] 200 set names [list yes no cancel] 211 foreach name $names lab $labels { 265 ::tk::unsupported::MacWindowStyle style $w moveableModal {}
|
/macosx-10.10/ICU-531.30/icuSources/i18n/ |
H A D | timezone.cpp | 1035 UResourceBundle *names = ures_getByKey(rb, kNAMES, NULL, &ec); local 1036 int32_t idx = findInStringArray(names, id, ec); 1037 result = ures_getStringByIndex(names, idx, NULL, &ec); 1041 ures_close(names); 1054 UResourceBundle *names = ures_getByKey(rb, kNAMES, NULL, &ec); local 1055 int32_t idx = findInStringArray(names, id, ec); 1056 result = ures_getStringByIndex(names, idx, NULL, &ec); 1066 const UChar* tmp = ures_getStringByIndex(names, deref, NULL, &ec); 1073 ures_close(names); 1159 TimeZone::getDisplayName(UBool daylight, EDisplayType style, UnicodeStrin argument 1173 getDisplayName(UBool daylight, EDisplayType style, const Locale& locale, UnicodeString& result) const argument [all...] |
/macosx-10.10/vim-55/runtime/syntax/ |
H A D | indent.vim | 68 \ -gnu --gnu-style 71 \ -kr --k-and-r-style --kernighan-and-ritchie --kernighan-and-ritchie-style 96 \ -npcs --no-space-after-function-call-names 111 \ -orig --berkeley --berkeley-style --original --original-style 126 \ -linux --linux-style
|
/macosx-10.10/WebCore-7600.1.25/html/ |
H A D | FileInputType.cpp | 206 RenderPtr<RenderElement> FileInputType::createInputRenderer(PassRef<RenderStyle> style) argument 208 return createRenderer<RenderFileUploadControl>(element(), WTF::move(style)); 439 StringBuilder names; local 441 names.append(fileList->item(i)->name()); 443 names.append('\n'); 445 return names.toString();
|
/macosx-10.10/tcl-105/tcl_ext/tcllib/tcllib/apps/ |
H A D | dtplite | 75 # output. The names are hardwired to "toc.$format" and 114 # -style file 163 # 'output' more selfcontained). Initially set via option '-style'. 165 variable style "" 341 # ?-style file? \ 351 variable output ; variable style ; variable stdout 374 } elseif {[string equal $opt "-style"]} { 376 set style [lindex $argv 1] 422 # Check style, header, and footer options, if present. 430 if {![string equal $style ""]} { [all...] |
/macosx-10.10/CPANInternal-159.1/Text-WordDiff-0.08/lib/Text/ |
H A D | WordDiff.pm | 115 # Load the style class and instantiate an instance. 116 my $style = delete $opts->{STYLE} || 'ANSIColor'; 117 $style = __PACKAGE__ . "::$style" if exists $styles{$style}; 118 eval "require $style" or die $@ unless $style->can('new'); 119 $style = $style->new($opts) if !ref $style; [all...] |
/macosx-10.10/tcl-105/tcl_ext/tcllib/tcllib/modules/pt/tools/ |
H A D | bench-compare.tcl | 34 foreach key [lsort -dict [array names BENCH usec*]] { 63 ::report::report R 6 style dcaptionedtable 2 4
|