@@ -14,8 +14,10 @@
 
 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