puts {The vfs test file is being sourced} package require Tk button .b -text {Your vfs test worked} pack .b