diff options
Diffstat (limited to 'tk8.6/library/ttk/aquaTheme.tcl')
-rw-r--r-- | tk8.6/library/ttk/aquaTheme.tcl | 64 |
1 files changed, 0 insertions, 64 deletions
diff --git a/tk8.6/library/ttk/aquaTheme.tcl b/tk8.6/library/ttk/aquaTheme.tcl deleted file mode 100644 index d6be5a3..0000000 --- a/tk8.6/library/ttk/aquaTheme.tcl +++ /dev/null @@ -1,64 +0,0 @@ -# -# Aqua theme (OSX native look and feel) -# - -namespace eval ttk::theme::aqua { - ttk::style theme settings aqua { - - ttk::style configure . \ - -font TkDefaultFont \ - -background systemWindowBody \ - -foreground systemModelessDialogActiveText \ - -selectbackground systemHighlight \ - -selectforeground systemModelessDialogActiveText \ - -selectborderwidth 0 \ - -insertwidth 1 - - ttk::style map . \ - -foreground {disabled systemModelessDialogInactiveText - background systemModelessDialogInactiveText} \ - -selectbackground {background systemHighlightSecondary - !focus systemHighlightSecondary} \ - -selectforeground {background systemModelessDialogInactiveText - !focus systemDialogActiveText} - - # Workaround for #1100117: - # Actually, on Aqua we probably shouldn't stipple images in - # disabled buttons even if it did work... - ttk::style configure . -stipple {} - - ttk::style configure TButton -anchor center -width -6 - ttk::style configure Toolbutton -padding 4 - - ttk::style configure TNotebook -tabmargins {10 0} -tabposition n - ttk::style configure TNotebook -padding {18 8 18 17} - ttk::style configure TNotebook.Tab -padding {12 3 12 2} - - # Combobox: - ttk::style configure TCombobox -postoffset {5 -2 -10 0} - - # Treeview: - ttk::style configure Heading -font TkHeadingFont - ttk::style configure Treeview -rowheight 18 -background White - ttk::style map Treeview \ - -background [list disabled systemDialogBackgroundInactive \ - {!disabled !selected} systemWindowBody \ - {selected background} systemHighlightSecondary \ - selected systemHighlight] \ - -foreground [list disabled systemModelessDialogInactiveText \ - {!disabled !selected} black \ - selected systemModelessDialogActiveText] - - # Enable animation for ttk::progressbar widget: - ttk::style configure TProgressbar -period 100 -maxphase 255 - - # For Aqua, labelframe labels should appear outside the border, - # with a 14 pixel inset and 4 pixels spacing between border and label - # (ref: Apple Human Interface Guidelines / Controls / Grouping Controls) - # - ttk::style configure TLabelframe \ - -labeloutside true -labelmargins {14 0 14 4} - - # TODO: panedwindow sashes should be 9 pixels (HIG:Controls:Split Views) - } -} |