# | 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 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |