tcl-load-file default to current buffer.