insight/143: Selected cells in memory window on Windows hosts hard to read

insight/143: Selected cells in memory window on Windows hosts hard to read

[craig]

>Number:         143
>Category:       insight
>Synopsis:       Selected cells in memory window on Windows hosts hard to read
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Mon May 06 14:13:00 PDT 2002
>Closed-Date:
>Last-Modified:
>Originator:     craig@triscend.com
>Release:        unknown-1.0
>Organization:
>Environment:
Windows 2000/Cygwin
>Description:
Selected cells in the memory window are displayed as white text on a light grey background, this is very hard to see on windows hosts.
>How-To-Repeat:

>Fix:
See attached patch file.
>Release-Note:
>Audit-Trail:
>Unformatted:
----gnatsweb-attachment----
Content-Type: text/plain; name="memwin.itb.pat"
Content-Disposition: inline; filename="memwin.itb.pat"

Index: gdb/gdbtk/library/memwin.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/memwin.itb,v
retrieving revision 1.17
diff -c -p -r1.17 memwin.itb
*** gdb/gdbtk/library/memwin.itb	6 Mar 2002 23:56:03 -0000	1.17
--- gdb/gdbtk/library/memwin.itb	6 May 2002 20:45:50 -0000
*************** body MemWin::build_win {} {
*** 116,122 ****
      $itk_interior.t configure -rowstretchmode none
    }
    scrollbar $itk_interior.sx -command [list $itk_interior.t xview] -orient horizontal
!   $itk_interior.t tag config sel -bg [$itk_interior.t cget -bg] -relief sunken
    $itk_interior.t tag config active -bg lightgray -relief sunken -wrap 0
    $itk_interior.t tag config title -bg [pref get gdb/font/header_bg] \
      -fg [pref get gdb/font/header_fg]
--- 116,123 ----
      $itk_interior.t configure -rowstretchmode none
    }
    scrollbar $itk_interior.sx -command [list $itk_interior.t xview] -orient horizontal
!   $itk_interior.t tag config sel -bg [$itk_interior.t cget -bg] \
!   -fg [$itk_interior.t cget -fg] -relief sunken
    $itk_interior.t tag config active -bg lightgray -relief sunken -wrap 0
    $itk_interior.t tag config title -bg [pref get gdb/font/header_bg] \
      -fg [pref get gdb/font/header_fg]