From: Vince D. <vi...@sa...> - 2002-10-31 15:08:14
|
In alphaCommands.tcl: if { ![llength [info commands refresh]] } { # Thanks to Johan Linde: proc refresh {{w ""}} { if {$w == ""} { if {[string length [win::Current]]} { eval [list sizeWin] [lrange [getGeometry] 2 end] } } else { eval [list sizeWin $w] [lrange [getGeometry $w] 2 end] } } } which has a different syntax to what you propose below.... -- Vince <http://www.santafe.edu/~vince> On Thu, 31 Oct 2002, Jon Guyer wrote: > Alpha8/X need > > refresh -w $wn($i) > > instead of > > refresh $wn($i) > > at line 125 of compare.tcl (in [compare::windowsInPlace]). It's not > clear to me that all variants of Alpha (e.g. Alpha7) can handle the > -w option, though? > > -- > > > Jonathan E. Guyer > <http://www.his.com/jguyer/> > > > > ------------------------------------------------------- > This sf.net email is sponsored by: Influence the future > of Java(TM) technology. Join the Java Community > Process(SM) (JCP(SM)) program now. > http://ads.sourceforge.net/cgi-bin/redirect.pl?sunm0004en > _______________________________________________ > AlphaTcl-developers mailing list > Alp...@li... > http://lists.sourceforge.net/lists/listinfo/alphatcl-developers > |