Fix weird tcl unarchive name is missing -src bug.