# | Line 148 | Line 148 | proc load_vars {f {vl all}} { # load RIF variables | |
---|---|---|
148 | } | |
149 | if {"$vl" == "all" && ! [chksave]} {return 0} | |
150 | set curmess {Please wait...} | |
151 | < | update idletasks |
151 | > | update |
152 | if [catch {exec rad -n -w -e $f >& /usr/tmp/ro[pid]}] { | |
153 | set curmess [exec cat /usr/tmp/ro[pid]] | |
154 | exec rm -f /usr/tmp/ro[pid] | |
# | Line 273 | Line 273 | proc newnew f { # create a new RIF | |
273 | proc do_file w { | |
274 | global rifname readonly rif_glob curfile curpat | |
275 | if {"$w" == "done"} { | |
276 | + | cd [file dirname $rifname] |
277 | set rif_glob $curpat | |
278 | return | |
279 | } |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |