From e3fe532ddce7311cfbbdc98d2e157d33f6275231 Mon Sep 17 00:00:00 2001
From: "Stefan-W. Hahn" <stefan.hahn@s-hahn.de>
Date: Sat, 5 Nov 2005 20:55:29 +0100
Subject: gitk: moving all three panes if clicking on an arrow.

Signed-off-by: Stefan-W. Hahn <stefan.hahn@s-hahn.de>
Signed-off-by: Junio C Hamano <junkio@cox.net>
---
 gitk | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'gitk')

diff --git a/gitk b/gitk
index 29220b1da2..ab2d9b8adf 100755
--- a/gitk
+++ b/gitk
@@ -3158,7 +3158,7 @@ proc clickisonarrow {id y} {
 }
 
 proc arrowjump {id dirn y} {
-    global mainline sidelines canv
+    global mainline sidelines canv canv2 canv3
 
     set yt {}
     if {$dirn eq "down"} {
@@ -3196,6 +3196,8 @@ proc arrowjump {id dirn y} {
 	set yfrac 0
     }
     $canv yview moveto $yfrac
+    $canv2 yview moveto $yfrac
+    $canv3 yview moveto $yfrac
 }
 
 proc lineclick {x y id isnew} {
-- 
cgit v1.2.3