@@ -6952,7 +6952,7 @@ proc findselectline {l} {
# mark the bits of a headline or author that match a find string
proc markmatches {canv l str tag matches font row} {
- global selectedline
+ global selectedline foundbgcolor
set bbox [$canv bbox $tag]
set x0 [lindex $bbox 0]
@@ -6966,7 +6966,7 @@ proc markmatches {canv l str tag matches font row} {
set xlen [font measure $font [string range $str 0 [expr {$end}]]]
set t [$canv create rect [expr {$x0+$xoff}] $y0 \
[expr {$x0+$xlen+2}] $y1 \
- -outline {} -tags [list match$l matches] -fill yellow]
+ -outline {} -tags [list match$l matches] -fill $foundbgcolor]
$canv lower $t
if {$row == $selectedline} {
$canv raise $t secsel
Signed-off-by: Guillermo S. Romero <gsromero@infernal-iceberg.com> --- Hi: This removes the hardcoded color and uses the user config (still yellow by default) so searches share a common look. GSR PS: Not subscribed to git@vger, so remember to CC: me. gitk | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-)