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

Comparing ray/src/util/do_action.tcl (file contents):
Revision 2.8 by greg, Thu Oct 5 13:16:39 1995 UTC vs.
Revision 2.9 by greg, Tue Oct 17 21:28:06 1995 UTC

# Line 223 | Line 223 | proc do_action w {             # Action screen
223                          -command {view_txt $bfname}
224          place $w.rbce -relwidth .1786 -relheight .0610 -relx .6429 -rely .5488
225          helplink $w.rbce trad action checkerr
226 <        if [file exists $bfname] {
226 >        if [file isfile $bfname] {
227                  set fi [open $bfname r]
228                  if {[scan [gets $fi] $batch_fmt batch_pid batch_host] != 2} {
229                          set batch_host unknown

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines