Make use of the new usage function...

This commit is contained in:
Dimitri Fontaine 2014-01-24 10:14:51 +01:00
parent be4cc804c0
commit 69b550a46e

View File

@ -125,8 +125,7 @@
(format t "pgloader version ~s~%" *version-string*))
(when help
(format t "~a [ option ... ] command-file ..." (first argv))
(command-line-arguments:show-option-help *opt-spec*))
(usage argv))
(when (or help version) (uiop:quit))