@@ -13,10 +13,12 @@
 set queue "${queue}.old"
 
 set fd [open $queue r]
 set data [read $fd]
 close $fd
+
+set ::env(TCLKIT) "/home/rkeene/bin/tclkit"
 
 foreach line [split $data "\n"] {
 	if {$line == ""} {
 		continue
 	}