source /home/rkeene/devel/tcl-nano/nano.tcl.real