diff options
| author | ericm <ericm> | 2000-03-04 01:44:16 (GMT) |
|---|---|---|
| committer | ericm <ericm> | 2000-03-04 01:44:16 (GMT) |
| commit | 8d402e473c0ff897f3009480215da12c428bde42 (patch) | |
| tree | 493f22d42c35ee86403574febc3990f58800c806 /library/choosedir.tcl | |
| parent | 27819c639da070236830ec6c142e44fd6f67a65a (diff) | |
| download | tk-8d402e473c0ff897f3009480215da12c428bde42.zip tk-8d402e473c0ff897f3009480215da12c428bde42.tar.gz tk-8d402e473c0ff897f3009480215da12c428bde42.tar.bz2 | |
fixed gridding problem
Diffstat (limited to 'library/choosedir.tcl')
| -rw-r--r-- | library/choosedir.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/library/choosedir.tcl b/library/choosedir.tcl index 659870c..879af23 100644 --- a/library/choosedir.tcl +++ b/library/choosedir.tcl @@ -6,7 +6,7 @@ # Copyright (c) 1998-2000 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: choosedir.tcl,v 1.4 2000/03/02 03:02:13 ericm Exp $
+# RCS: @(#) $Id: choosedir.tcl,v 1.5 2000/03/04 01:44:16 ericm Exp $
# Make sure the tk::dialog namespace, in which all dialogs should live, exists
namespace eval ::tk::dialog {}
@@ -112,8 +112,9 @@ proc ::tk::dialog::chooseDir::tkChooseDirectory { args } { grid configure $lbl -sticky w
grid configure $ent -sticky ew
grid configure $frm -sticky nsew
- grid columnconfigure . 0 -weight 1
- grid columnconfigure . 1 -weight 1
+ grid columnconfigure $w 0 -weight 1
+ grid columnconfigure $w 1 -weight 1
+ grid rowconfigure $w 2 -weight 1
$ent insert end $opts(-initialdir)
|