Avoid useless output

This commit is contained in:
Eli Barzilay 2010-11-11 00:19:17 -05:00
parent e3592e10a8
commit 686ec837e9

View File

@ -47,4 +47,5 @@
(delete-directory/files (delete-directory/files
(build-path (find-system-path 'temp-dir) "setvers")) (build-path (find-system-path 'temp-dir) "setvers"))
(printf "done!\n")] (printf "done!\n")]
[else (error 'winvers "unknown command line: ~e" argv)])) [else (error 'winvers "unknown command line: ~e" argv)])
(void))