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

Comparing ray/src/util/do_file.tcl (file contents):
Revision 2.3 by greg, Tue Dec 6 15:54:45 1994 UTC vs.
Revision 2.4 by greg, Thu Dec 8 15:53:46 1994 UTC

# Line 282 | Line 282 | proc do_file w {
282          pack $w.left -side left
283          button $w.left.load -text LOAD -width 5 \
284                          -relief raised -command {newload $curfile}
285 <        button $w.left.save -text SAVE -width 5 \
286 <                        -relief raised -command {newsave $curfile}
285 >        button $w.left.save -text SAVE -width 5 -relief raised \
286 >                        -command "newsave \$curfile; update_dir $w.right"
287          button $w.left.new -text NEW -width 5 \
288                          -relief raised -command {newnew $curfile}
289          pack $w.left.load $w.left.save $w.left.new -side top -pady 15 -padx 20

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines