From: Shawn O. Pearce <spearce@spearce.org>
Date: Tue, 22 Jan 2008 15:40:13 +0000 (-0500)
Subject: git-gui: Work around random missing scrollbar in revision list
X-Git-Tag: gitgui-0.9.2~3
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/3ddff72e581e5c7477aaeb8b97a17691f7ff55bf?ds=inline;hp=--cc

git-gui: Work around random missing scrollbar in revision list

If the horizontal scrollbar isn't currently visible (because it has
not been needed) but we get an update to the scroll port we may find
the scrollbar window exists but the Tcl command doesn't.  Apparently
it is possible for Tk to have partially destroyed the scrollbar by
removing the Tcl procedure name but still leaving the widget name in
the window registry.

Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
---

3ddff72e581e5c7477aaeb8b97a17691f7ff55bf
diff --git a/lib/choose_rev.tcl b/lib/choose_rev.tcl
index a063c5bc49..c8821c1463 100644
--- a/lib/choose_rev.tcl
+++ b/lib/choose_rev.tcl
@@ -451,7 +451,8 @@ method _sb_set {sb orient first last} {
 			focus $old_focus
 		}
 	}
-	$sb set $first $last
+
+	catch {$sb set $first $last}
 }
 
 method _show_tooltip {pos} {