Corrected call to `read-file-name'.