diff --git a/lib/gui.tcl b/lib/gui.tcl index bfef450..3be4f53 100644 --- a/lib/gui.tcl +++ b/lib/gui.tcl @@ -66,8 +66,8 @@ if [info exists cfgVariables(theme)] { ttk::style theme use $cfgVariables(theme) } -ttk::frame .frmMenu -border 1 -relief raised -frame .frmBody -border 1 -relief raised -highlightthickness 0 +ttk::frame .frmMenu -border 0 -relief raised +ttk::frame .frmBody -border 1 -relief raised ttk::frame .frmStatus -border 0 -relief sunken pack .frmMenu -side top -padx 1 -fill x pack .frmBody -side top -padx 1 -fill both -expand true @@ -128,7 +128,7 @@ grid $frmTree.v -row 0 -column 1 -sticky nsew grid columnconfigure $frmTree 0 -weight 1 grid rowconfigure $frmTree 0 -weight 1 -set frmWork [ttk::frame .frmWork] +set frmWork [ttk::frame .frmWork -border 0 -relief flat] set nbEditor [ttk::notebook $frmWork.nbEditor] @@ -180,4 +180,3 @@ if {$cfgVariables(filesPanelShow) eq "true"} { ttk::style configure . \ -foreground $::cfgVariables(guiFG) \ -font $::cfgVariables(guiFont) - diff --git a/theme/ttk_theme_dark.tcl b/theme/ttk_theme_dark.tcl index cd22ef0..7a0f4ea 100644 --- a/theme/ttk_theme_dark.tcl +++ b/theme/ttk_theme_dark.tcl @@ -63,7 +63,7 @@ namespace eval ttk::theme::dark { -indicatorbackground "#ffffff" -indicatormargin {1 1 4 1} ttk::style configure TRadiobutton \ -indicatorbackground "#ffffff" -indicatormargin {1 1 4 1} - + ttk::style configure TFrame -relief flat -border -1 # ttk::style configure TEntry -fieldbackground #ffffff -foreground #000000 -padding {2 0} ttk::style configure TEntry -fieldbackground $colors(-lightframe) -foreground #ffffff -padding {2 0} @@ -76,6 +76,8 @@ namespace eval ttk::theme::dark { -fieldbackground $colors(-lightframe) \ -foreground #ffffff + ttk::style configure TNotebook + # -bordercolor $colors(-frame) ttk::style configure TNotebook.Tab \ -padding {6 2 6 2}