ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/util/do_results3.6.tcl
(Generate patch)

Comparing ray/src/util/do_results3.6.tcl (file contents):
Revision 2.1 by greg, Thu Oct 27 15:56:08 1994 UTC vs.
Revision 2.2 by greg, Sun Nov 6 21:35:52 1994 UTC

# Line 140 | Line 140 | proc cnvpic {} {               # Convert selected pictures
140                  set p $radvar(PICTURE)_$vw.pic
141                  set df [format $convdest $vw]
142                  set curmess "Converting $p to $df..."
143 <                update idletasks
143 >                update
144                  set cc [format $conv($conv(typ),com) $p $df]
145                  if {! [catch {eval exec $cc} curmess]} {
146                          set curmess "Done."
# Line 154 | Line 154 | proc prtpic {} {               # Print selected pictures
154          foreach i [$fvwbox curselection] {
155                  set p $radvar(PICTURE)_[$fvwbox get $i].pic
156                  set curmess "Printing $p..."
157 <                update idletasks
157 >                update
158                  set pc [format $prntcom $p]
159                  if {! [catch {eval exec $pc} curmess]} {
160                          set curmess "Done."

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines