global/git
1
0
Fork 0
mirror of https://github.com/git/git.git synced 2026-03-13 10:23:30 +01:00
Code Issues Packages Projects Releases Wiki Activity

Better contrast of text and background of selected lines.

Browse Source 
The color -selectbackground is commonly dark, but so is the text (black).
-highlightbackground is a bit lighter, hence, it offers better contrast
in the selected entries while the selected entry still clearly stands out
from the other entries.

Signed-off-by: Johannes Sixt <johannes.sixt@telecom.at>
This commit is contained in:
Johannes Sixt
2007-03-01 15:00:20 +01:00
parent 02560cdbcf
commit 3724812944
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
gitk
View File

@@ -667,7 +667,7 @@ proc makewindow {} {
pack .bright.sb -side right -fill y
pack $cflist -side left -fill both -expand 1
$cflist tag configure highlight \
-background [$cflist cget -selectbackground]
-background [$cflist cget -highlightbackground]
$cflist tag configure bold -font [concat $mainfont bold]
.pwbottom add .bright
@@ -1755,7 +1755,7 @@ proc bolden {row font} {
$canv delete secsel
set t [eval $canv create rect [$canv bbox $linehtag($row)] \
-outline {{}} -tags secsel \
-fill [$canv cget -selectbackground]]
-fill [$canv cget -highlightbackground]]
$canv lower $t
}
}
@@ -1769,7 +1769,7 @@ proc bolden_name {row font} {
$canv2 delete secsel
set t [eval $canv2 create rect [$canv2 bbox $linentag($row)] \
-outline {{}} -tags secsel \
-fill [$canv2 cget -selectbackground]]
-fill [$canv2 cget -highlightbackground]]
$canv2 lower $t
}
}
@@ -3885,15 +3885,15 @@ proc selectline {l isnew} {
if {![info exists linehtag($l)]} return
$canv delete secsel
set t [eval $canv create rect [$canv bbox $linehtag($l)] -outline {{}} \
-tags secsel -fill [$canv cget -selectbackground]]
-tags secsel -fill [$canv cget -highlightbackground]]
$canv lower $t
$canv2 delete secsel
set t [eval $canv2 create rect [$canv2 bbox $linentag($l)] -outline {{}} \
-tags secsel -fill [$canv2 cget -selectbackground]]
-tags secsel -fill [$canv2 cget -highlightbackground]]
$canv2 lower $t
$canv3 delete secsel
set t [eval $canv3 create rect [$canv3 bbox $linedtag($l)] -outline {{}} \
-tags secsel -fill [$canv3 cget -selectbackground]]
-tags secsel -fill [$canv3 cget -highlightbackground]]
$canv3 lower $t
if {$isnew} {