summaryrefslogtreecommitdiff
path: root/lib/blame.tcl
diff options
context:
space:
mode:
authorLibravatar Shawn O. Pearce <spearce@spearce.org>2007-06-01 23:48:18 -0400
committerLibravatar Shawn O. Pearce <spearce@spearce.org>2007-06-06 01:26:48 -0400
commit08dda17e00e676c5cd1b4f2a8245c318d6c97f82 (patch)
tree4b649a8d98bf78f2751180280f49f7064a023646 /lib/blame.tcl
parentgit-gui: Show original filename in blame tooltip (diff)
downloadtgif-08dda17e00e676c5cd1b4f2a8245c318d6c97f82.tar.xz
git-gui: Use a label instead of a button for the back button
Apparently Tk on Mac OS X won't draw a button with an image using a transparent background. Instead it draws the button using some sort of 3D effect, even though I asked for no relief and no border. The background is also not our orange that we expected it to be. Earlier I had tried this same trick on Windows and it draws the same way as the button did, so I'm going to switch to the label as that seems to be more portable. Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
Diffstat (limited to 'lib/blame.tcl')
-rw-r--r--lib/blame.tcl8
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/blame.tcl b/lib/blame.tcl
index bd8e631f34..2f7503ad6b 100644
--- a/lib/blame.tcl
+++ b/lib/blame.tcl
@@ -66,14 +66,18 @@ constructor new {i_commit i_path} {
-anchor w \
-justify left
set w_back $w.header.commit_b
- button $w_back \
- -command [cb _history_menu] \
+ label $w_back \
-image ::blame::img_back_arrow \
-borderwidth 0 \
-relief flat \
-state disabled \
-background orange \
-activebackground orange
+ bind $w_back <Button-1> "
+ if {\[$w_back cget -state\] eq {normal}} {
+ [cb _history_menu]
+ }
+ "
label $w.header.commit \
-textvariable @commit \
-background orange \