diff options
| author |  Shawn O. Pearce <spearce@spearce.org> | 2008-01-22 10:40:13 -0500 |
|---|---|---|
| committer | Shawn O. Pearce <spearce@spearce.org> | 2008-01-22 23:37:15 -0500 |
| commit | 3ddff72e581e5c7477aaeb8b97a17691f7ff55bf (patch) | |
| tree | 2f24a4d89d2305af6a6452f8940c6aae6b45ab43 /lib | |
| parent | git-gui: Correct encoding of glossary/fr.po to UTF-8 (diff) | |
| download | tgif-3ddff72e581e5c7477aaeb8b97a17691f7ff55bf.tar.xz | |
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>
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/choose_rev.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
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} { |