#!/usr/bin/tclsh
#	^^^ shebang line only for vim to recognize the language :)
#
#	$Id: oitsrc,v 1.1 2003/03/26 13:36:18 kripke Exp $
#	sample oits startup file
#

proc oitscb {} {
	# puts "oitscb"
	request do tag val {
		puts "$tag $val"
		if { 0 <= $tag } { session add $tag $val }
	}
}

puts "oitsrc done"