author | Andrew Shadura <andrew@shadura.me> |
Sun, 28 Sep 2014 13:27:40 +0200 | |
changeset 22631 | d246eb9cabbc |
parent 22630 | 0290982e5ac7 |
child 22632 | db15bb2d6323 |
contrib/hgk | file | annotate | diff | comparison | revisions |
--- a/contrib/hgk Tue Sep 30 14:32:49 2014 -0700 +++ b/contrib/hgk Sun Sep 28 13:27:40 2014 +0200 @@ -1271,9 +1271,9 @@ set rowtextx($idline($id)) [expr {$xr + $linespc}] } elseif {[incr nbookmarks -1] >= 0} { # draw a tag - set col gray50 + set col "#7f7f7f" if {[string compare $bookmarkcurrent $tag] == 0} { - set col gray + set col "#bebebe" } set xl [expr $xl - $delta/2] $canv create polygon $x $yt $xr $yt $xr $yb $x $yb \