diff --git a/lib/blame.tcl b/lib/blame.tcl
index cb0f2c40b759848fd2fc5e3f42e89c01d7113712..98687c77daf2f5746b40674abc0e9fac8a0de7ed 100644 (file)
--- a/lib/blame.tcl
+++ b/lib/blame.tcl
make_toplevel top w
wm title $top "[appname] ([reponame]): File Viewer"
- frame $w.header -background orange
+ frame $w.header -background gold
label $w.header.commit_l \
-text {Commit:} \
- -background orange \
+ -background gold \
-anchor w \
-justify left
set w_back $w.header.commit_b
-borderwidth 0 \
-relief flat \
-state disabled \
- -background orange \
- -activebackground orange
+ -background gold \
+ -activebackground gold
bind $w_back <Button-1> "
if {\[$w_back cget -state\] eq {normal}} {
[cb _history_menu]
"
label $w.header.commit \
-textvariable @commit \
- -background orange \
+ -background gold \
-anchor w \
-justify left
label $w.header.path_l \
-text {File:} \
- -background orange \
+ -background gold \
-anchor w \
-justify left
set w_path $w.header.path
label $w_path \
- -background orange \
+ -background gold \
-anchor w \
-justify left
pack $w.header.commit_l -side left