diff options
author | das <das> | 2007-11-04 10:38:45 (GMT) |
---|---|---|
committer | das <das> | 2007-11-04 10:38:45 (GMT) |
commit | 714a97699dd9691c81c6ece3c994875c555d4ea7 (patch) | |
tree | 2a88cdc35124b75d3ac50558f1f891db0c385651 /library/bgerror.tcl | |
parent | 16916e76d4e7a9494bcd4bbaffca892c8802755b (diff) | |
download | tk-714a97699dd9691c81c6ece3c994875c555d4ea7.zip tk-714a97699dd9691c81c6ece3c994875c555d4ea7.tar.gz tk-714a97699dd9691c81c6ece3c994875c555d4ea7.tar.bz2 |
* library/bgerror.tcl: fix background of detail text on Aqua.
Diffstat (limited to 'library/bgerror.tcl')
-rw-r--r-- | library/bgerror.tcl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/library/bgerror.tcl b/library/bgerror.tcl index 06d707d..556a81a 100644 --- a/library/bgerror.tcl +++ b/library/bgerror.tcl @@ -9,8 +9,8 @@ # Copyright (c) 1998-2000 by Ajuba Solutions. # Copyright (c) 2007 by ActiveState Software Inc. # -# RCS: @(#) $Id: bgerror.tcl,v 1.35 2007/10/30 01:57:54 hobbs Exp $ -# $Id: bgerror.tcl,v 1.35 2007/10/30 01:57:54 hobbs Exp $ +# RCS: @(#) $Id: bgerror.tcl,v 1.36 2007/11/04 10:38:45 das Exp $ +# $Id: bgerror.tcl,v 1.36 2007/11/04 10:38:45 das Exp $ namespace eval ::tk::dialog::error { namespace import -force ::tk::msgcat::* @@ -22,6 +22,7 @@ namespace eval ::tk::dialog::error { if {[tk windowingsystem] eq "aqua"} { option add *ErrorDialog*background systemAlertBackgroundActive \ widgetDefault + option add *ErrorDialog*info.text.background white widgetDefault option add *ErrorDialog*Button.highlightBackground \ systemAlertBackgroundActive widgetDefault } |