diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-11-25 07:12:58 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-11-25 07:12:58 +0000 |
commit | e40a5e82ec41a2967300c9030c0442adcf90f574 (patch) | |
tree | c40081996062bdbeee259ee058451945a59fc6cc /ext/tk | |
parent | 9889c773648dd3af80b4ed79cfe8990c8f650189 (diff) |
commit miss.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@9616 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk')
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc.tcl | 163 | ||||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/button-h.gif | bin | 522 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/button-n.gif | bin | 554 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/button-p.gif | bin | 548 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/check-hc.gif | bin | 281 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/check-hu.gif | bin | 273 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/check-nc.gif | bin | 303 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/check-nu.gif | bin | 294 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/radio-hc.gif | bin | 652 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/radio-hu.gif | bin | 644 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/radio-nc.gif | bin | 632 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/kroc/radio-nu.gif | bin | 621 -> 0 bytes | |||
-rw-r--r-- | ext/tk/sample/tkextlib/tile/themes/pkgIndex.tcl | 15 |
13 files changed, 0 insertions, 178 deletions
diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc.tcl b/ext/tk/sample/tkextlib/tile/themes/kroc.tcl deleted file mode 100644 index 73548acef2..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc.tcl +++ /dev/null @@ -1,163 +0,0 @@ -# kroc.tcl - Copyright (C) 2004 David Zolli <kroc@kroc.tk> -# -# A sample pixmap theme for the tile package. - -#package require tile::pixmap - -namespace eval tile { - namespace eval kroc { - variable version 0.0.1 - } -} - -namespace eval tile::kroc { - - set imgdir [file join [file dirname [info script]] kroc] - array set Images [tile::LoadImages $imgdir *.gif] - - if {[package vsatisfies [package provide tile] 0.5]} { - set TNoteBook_Tab TNotebook.Tab - } else { - set TNoteBook_Tab Tab.TNotebook - } - - style theme create kroc -parent alt -settings { - - style default . -background #FCB64F -troughcolor #F8C278 -borderwidth 1 - style default . -font TkDefaultFont -borderwidth 1 - style map . -background [list active #694418] - style map . -foreground [list disabled #B2B2B2 active #FFE7CB] - - style default TButton -padding "10 4" - - style default $TNoteBook_Tab -padding {10 3} -font TkDefaultFont - style map $TNoteBook_Tab \ - -background [list selected #FCB64F {} #FFE6BA] \ - -foreground [list {} black] \ - -padding [list selected {10 6 10 3}] - - style map TScrollbar \ - -background { pressed #694418} \ - -arrowcolor { pressed #FFE7CB } \ - -relief { pressed sunken } \ - ; - - style layout Vertical.TScrollbar { - Scrollbar.trough -children { - Scrollbar.uparrow -side top - Scrollbar.downarrow -side bottom - Scrollbar.uparrow -side bottom - Scrollbar.thumb -side top -expand true - } - } - - style layout Horizontal.TScrollbar { - Scrollbar.trough -children { - Scrollbar.leftarrow -side left - Scrollbar.rightarrow -side right - Scrollbar.leftarrow -side right - Scrollbar.thumb -side left -expand true - } - } - - # - # Elements: - # - if {[package vsatisfies [package provide tile] 0.5]} { - - style element create Button.button image $Images(button-n) \ - -map [list \ - pressed $Images(button-p) \ - active $Images(button-h) \ - ] -border 3 -sticky ew - - style element create Checkbutton.indicator image $Images(check-nu) \ - -map [list \ - {pressed selected} $Images(check-nc) \ - pressed $Images(check-nu) \ - {active selected} $Images(check-hc) \ - active $Images(check-hu) \ - selected $Images(check-nc) \ - ] -sticky w - - style element create Radiobutton.indicator image $Images(radio-nu) \ - -map [list \ - {pressed selected} $Images(radio-nc) \ - pressed $Images(radio-nu) \ - {active selected} $Images(radio-hc) \ - active $Images(radio-hu) \ - selected $Images(radio-nc) \ - ] -sticky w - - } else { - - style element create Button.button pixmap -images [list \ - pressed $Images(button-p) \ - active $Images(button-h) \ - {} $Images(button-n) \ - ] -border 3 -tiling tile - - style element create Checkbutton.indicator pixmap -images [list \ - {pressed selected} $Images(check-nc) \ - pressed $Images(check-nu) \ - {active selected} $Images(check-hc) \ - active $Images(check-hu) \ - selected $Images(check-nc) \ - {} $Images(check-nu) \ - ] -tiling fixed - - style element create Radiobutton.indicator pixmap -images [list \ - {pressed selected} $Images(radio-nc) \ - pressed $Images(radio-nu) \ - {active selected} $Images(radio-hc) \ - active $Images(radio-hu) \ - selected $Images(radio-nc) \ - {} $Images(radio-nu) \ - ] -tiling fixed - - } - - # - # Settings: (*button.background is not needed in tile 0.5 or above) - # - style layout TButton { - Button.button -children { - Button.focus -children { - Button.padding -children { - Button.label -expand true -sticky {} - } - } - } - } - - style layout TCheckbutton { - Checkbutton.border -children { - Checkbutton.background - Checkbutton.padding -children { - Checkbutton.indicator -side left - Checkbutton.focus -side left -children { - Checkbutton.label - } - } - } - } - - style layout TRadiobutton { - Radiobutton.border -children { - Radiobutton.background - Radiobutton.padding -children { - Radiobutton.indicator -side left - Radiobutton.focus -expand true -sticky w -children { - Radiobutton.label -side right -expand true - } - } - } - } - - } } - -# ------------------------------------------------------------------------- - -package provide tile::theme::kroc $::tile::kroc::version - -# ------------------------------------------------------------------------- diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/button-h.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/button-h.gif Binary files differdeleted file mode 100644 index e7a140dede..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/button-h.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/button-n.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/button-n.gif Binary files differdeleted file mode 100644 index 78b506ddeb..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/button-n.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/button-p.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/button-p.gif Binary files differdeleted file mode 100644 index a5a4e90be1..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/button-p.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/check-hc.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/check-hc.gif Binary files differdeleted file mode 100644 index 41503c5ebd..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/check-hc.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/check-hu.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/check-hu.gif Binary files differdeleted file mode 100644 index b3e512ca67..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/check-hu.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/check-nc.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/check-nc.gif Binary files differdeleted file mode 100644 index a28c288fce..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/check-nc.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/check-nu.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/check-nu.gif Binary files differdeleted file mode 100644 index 5c23931bbc..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/check-nu.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-hc.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/radio-hc.gif Binary files differdeleted file mode 100644 index 359fe1cc8b..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-hc.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-hu.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/radio-hu.gif Binary files differdeleted file mode 100644 index 9f46b37926..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-hu.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-nc.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/radio-nc.gif Binary files differdeleted file mode 100644 index 6437f33a7a..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-nc.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-nu.gif b/ext/tk/sample/tkextlib/tile/themes/kroc/radio-nu.gif Binary files differdeleted file mode 100644 index 2d2aac8597..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/kroc/radio-nu.gif +++ /dev/null diff --git a/ext/tk/sample/tkextlib/tile/themes/pkgIndex.tcl b/ext/tk/sample/tkextlib/tile/themes/pkgIndex.tcl deleted file mode 100644 index 179077917c..0000000000 --- a/ext/tk/sample/tkextlib/tile/themes/pkgIndex.tcl +++ /dev/null @@ -1,15 +0,0 @@ -# pkgIndex.tcl for additional tile pixmap themes. -# -# We don't provide the package is the image subdirectory isn't present, -# or we don't have the right version of Tcl/Tk -# -# To use this automatically within tile, the tile-using application should -# use tile::availableThemes and tile::setTheme -# -# $Id$ - -if {![file isdirectory [file join $dir kroc]]} { return } -if {![package vsatisfies [package provide Tcl] 8.4]} { return } - -package ifneeded tile::theme::kroc 0.0.1 \ - [list source [file join $dir kroc.tcl]] |