--- ray/src/util/do_results3.6.tcl	1994/10/27 15:56:08	2.1
+++ ray/src/util/do_results3.6.tcl	1995/02/22 20:48:51	2.3
@@ -79,7 +79,7 @@ proc delpic {} {		# Delete selected pictures
 	}
 	if [tk_dialog .dlg {Verification} \
 			"Really delete picture file(s) $selected_pics?" \
-			questhead 1 {Delete} {Cancel}] {
+			questhead 0 {Delete} {Cancel}] {
 		return
 	}
 	if {! [catch {eval exec rm $selected_pics < /dev/null} curmess]} {
@@ -140,7 +140,7 @@ proc cnvpic {} {		# Convert selected pictures
 		set p $radvar(PICTURE)_$vw.pic
 		set df [format $convdest $vw]
 		set curmess "Converting $p to $df..."
-		update idletasks
+		update
 		set cc [format $conv($conv(typ),com) $p $df]
 		if {! [catch {eval exec $cc} curmess]} {
 			set curmess "Done."
@@ -154,7 +154,7 @@ proc prtpic {} {		# Print selected pictures
 	foreach i [$fvwbox curselection] {
 		set p $radvar(PICTURE)_[$fvwbox get $i].pic
 		set curmess "Printing $p..."
-		update idletasks
+		update
 		set pc [format $prntcom $p]
 		if {! [catch {eval exec $pc} curmess]} {
 			set curmess "Done."