Skip to content

Commit 2a52666

Browse files
authored
ver 0.6
Add Some defaults for non ttk-widgets so that they fit to the Breeze theme, too
1 parent 5aa1217 commit 2a52666

File tree

2 files changed

+13
-2
lines changed

2 files changed

+13
-2
lines changed

breeze.tcl

+12-1
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,7 @@ package require Tk 8.6.0
88

99
namespace eval ttk::theme::Breeze {
1010

11-
variable version 0.5
11+
variable version 0.6
1212
package provide ttk::theme::Breeze $version
1313

1414
variable colors
@@ -319,5 +319,16 @@ namespace eval ttk::theme::Breeze {
319319
# Treeview
320320
ttk::style configure Treeview -background white
321321
ttk::style configure Treeview.Item -padding {2 0 0 0}
322+
323+
# Some defaults for non ttk-widgets so that they fit
324+
# to the Breeze theme, too
325+
tk_setPalette background [ttk::style lookup . -background] \
326+
foreground [ttk::style lookup . -foreground] \
327+
highlightColor [ttk::style lookup . -focuscolor] \
328+
selectBackground [ttk::style lookup . -selectbackground] \
329+
selectForeground [ttk::style lookup . -selectforeground] \
330+
activeBackground [ttk::style lookup . -selectbackground] \
331+
activeForeground [ttk::style lookup . -selectforeground]
332+
option add *font [ttk::style lookup . -font]
322333
}
323334
}

pkgIndex.tcl

+1-1
Original file line numberDiff line numberDiff line change
@@ -9,6 +9,6 @@
99
if {![file isdirectory [file join $dir Breeze]]} { return }
1010
if {![package vsatisfies [package provide Tcl] 8.6]} { return }
1111

12-
package ifneeded ttk::theme::Breeze 0.5 \
12+
package ifneeded ttk::theme::Breeze 0.6 \
1313
[list source [file join $dir breeze.tcl]]
1414

0 commit comments

Comments
 (0)