--- ray/src/util/do_scene3.6.tcl 1994/12/06 15:54:43 2.6 +++ ray/src/util/do_scene3.6.tcl 1995/02/22 20:48:52 2.7 @@ -45,7 +45,7 @@ proc oct_delete {} { # delete octree file } if [tk_dialog .dlg {Verification} \ "Really delete octree file $radvar(OCTREE)?" \ - questhead 1 {Delete} {Cancel}] { + questhead 0 {Delete} {Cancel}] { return 0 } if [catch {exec rm $radvar(OCTREE) < /dev/null} curmess] {return 0}