X-Git-Url: https://asedeno.scripts.mit.edu/gitweb/?a=blobdiff_plain;f=lib%2Fconsole.tcl;h=2075374683a49dd8a955e52c76d951ec3013536b;hb=e73bfa7709b108575e6ea73d6e97fc3efd967b38;hp=c0e6fb3cc2fe9cb66e114d4998b2e91d65548980;hpb=6f2d73ec0cb6d5937bb4a62a222f942e4f886d6e;p=git.git

diff --git a/lib/console.tcl b/lib/console.tcl
index c0e6fb3cc..207537468 100644
--- a/lib/console.tcl
+++ b/lib/console.tcl
@@ -202,14 +202,8 @@ method done {ok} {
 }
 
 method _sb_set {sb orient first last} {
-	if {$first == 0 && $last == 1} {
-		if {[winfo exists $sb]} {
-			destroy $sb
-		}
-		return
-	}
-
 	if {![winfo exists $sb]} {
+		if {$first == $last || ($first == 0 && $last == 1)} return
 		if {$orient eq {h}} {
 			scrollbar $sb -orient h -command [list $w_t xview]
 			pack $sb -fill x -side bottom -before $w_t
@@ -218,7 +212,7 @@ method _sb_set {sb orient first last} {
 			pack $sb -fill y -side right -before $w_t
 		}
 	}
-	catch {$sb set $first $last}
+	$sb set $first $last
 }
 
 }