Index: lib/xvfs/xvfs.tcl ================================================================== --- lib/xvfs/xvfs.tcl +++ lib/xvfs/xvfs.tcl @@ -167,11 +167,11 @@ unset -nocomplain fileInfo catch { file lstat $inputFile fileInfo } if {![info exists fileInfo]} { - ::xvfs::_emitLine stderr "warning: Unable to access $inputFile, skipping" + puts stderr "warning: Unable to access $inputFile, skipping" } lappend children [file tail $file] if {$fileInfo(type) eq "directory"} {