--- ray/src/util/do_options.tcl	1994/10/27 15:56:07	2.1
+++ ray/src/util/do_options.tcl	1994/10/28 20:14:36	2.2
@@ -109,7 +109,7 @@ proc do_options w {		# Set up options screen
 	place $w.revert -relwidth .1071 -relheight .0610 -relx .98 -rely .98 \
 			-anchor se
 	helplink $w.revert trad options revert
-	button $w.copy -text Copy -relief raised -command {getfile \
+	button $w.copy -text Copy -relief raised -command {getfile -grab \
 			-send copyopts -view view_txt -glob $rif_glob}
 	place $w.copy -relwidth .1071 -relheight .0610 -relx .98 -rely .90 \
 			-anchor se