cuirass: Fix 'show-help'.

pull/3/head
Mathieu Lirzin 2016-07-13 18:34:08 +02:00
parent 2ea7029a31
commit 3efe57e0ca
1 changed files with 2 additions and 2 deletions

View File

@ -31,8 +31,8 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@"
(ice-9 getopt-long)
(ice-9 popen))
(define* (show-help)
(simple-format #t "Usage: ~a [OPTIONS] SPECFILE~%" (%program-name))
(define (show-help)
(format #t "Usage: ~a [OPTIONS] SPECFILE~%" (%program-name))
(display "Run build jobs from SPECFILE.
--one-shot Evaluate and build jobs only once