# | Line 15 | Line 15 | proc amb_delete {} { # delete ambient file | |
---|---|---|
15 | if {$nv > 50 && [tk_dialog .dlg {Verification} \ | |
16 | "Really delete ambient file $radvar(AMBFILE)\ | |
17 | with $nv indirect irradiance values?" \ | |
18 | < | questhead 1 {Delete} {Cancel}]} { |
18 | > | questhead 0 {Delete} {Cancel}]} { |
19 | return 0 | |
20 | } | |
21 | if [catch {exec rm $radvar(AMBFILE) < /dev/null} curmess] {return 0} |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |