Index: lib/xvfs/xvfs.tcl
==================================================================
--- lib/xvfs/xvfs.tcl
+++ lib/xvfs/xvfs.tcl
@@ -8,15 +8,15 @@
 }
 
 proc ::xvfs::printHelp {channel {errors ""}} {
 	if {[llength $errors] != 0} {
 		foreach error $errors {
-			::xvfs::_emitLine $channel "error: $error"
+			puts $channel "error: $error"
 		}
-		::xvfs::_emitLine $channel ""
+		puts $channel ""
 	}
-	::xvfs::_emitLine $channel "Usage: dir2c \[--help\] --directory <rootDirectory> --name <fsName>"
+	puts $channel "Usage: dir2c \[--help\] \[--output <filename>\] --directory <rootDirectory> --name <fsName>"
 	flush $channel
 }
 
 proc ::xvfs::sanitizeCString {string} {
 	set output [join [lmap char [split $string ""] {