Attachment "cvsdiff_widget" to
ticket [620754ffff]
added by
decosterjos
2002-10-09 20:26:06.
Index: widget.tcl
===================================================================
RCS file: /cvsroot/tcllib/bwidget/widget.tcl,v
retrieving revision 1.20
diff -r1.20 widget.tcl
4c4
< # $Id: widget.tcl,v 1.20 2002/01/23 00:36:53 hobbs Exp $
---
> # $Id: widget.tcl,v 1.3 2002/10/08 12:56:04 decoster Exp $
1020a1021,1024
> # JDC: Withdraw toplevels, otherwise visible
> if { ![string compare $tkwidget "toplevel"] } {
> wm withdraw $widget
> }
