[Amsn-commits] msn searchdialog.tcl,1.10,1.11

[Tom J. <bl...@us...>]

Update of /cvsroot/amsn/msn
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6975

Modified Files:
	searchdialog.tcl 
Log Message:
Highlight colour taken from selection background colour


Index: searchdialog.tcl
===================================================================
RCS file: /cvsroot/amsn/msn/searchdialog.tcl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** searchdialog.tcl	15 Feb 2006 17:20:40 -0000	1.10
--- searchdialog.tcl	26 Feb 2006 19:51:49 -0000	1.11
***************
*** 134,138 ****
  		set options(-searchin) $value
  		# Create the 'search' tag on the text widget
! 		$value tag configure search -background #447bcd -foreground white
  		# Make sure when the text widget is clicked, the search highlight disappears
  		bind $value <ButtonPress> "+$value tag remove search 0.0 end"
--- 134,138 ----
  		set options(-searchin) $value
  		# Create the 'search' tag on the text widget
! 		$value tag configure search -background [$value tag cget sel -background] -foreground white
  		# Make sure when the text widget is clicked, the search highlight disappears
  		bind $value <ButtonPress> "+$value tag remove search 0.0 end"