--- ray/src/util/trad.wsh	1995/10/17 21:28:21	2.13
+++ ray/src/util/trad.wsh	2003/02/22 02:07:30	2.15
@@ -1,5 +1,5 @@
 #!/usr/local/bin/wish4.0
-# SCCSid "$SunId$ LBL"
+# RCSid: $Id: trad.wsh,v 2.15 2003/02/22 02:07:30 greg Exp $
 #
 # TCL/TK-based Rad Input File Editor
 #
@@ -10,6 +10,14 @@ set radlib /usr/local/lib/ray/tcl
 set helplib $radlib
 
 set auto_path [linsert $auto_path 0 $radlib]
+
+# Assign global globbing variables
+
+set myglob(rif) *.rif
+set myglob(materials) *.mat
+set myglob(illum) *.rad
+set myglob(scene) *.rad
+set myglob(objects) *
 
 # Create required procedures