Coding Tcl ocassionaly...

[testrgomez]