From 3efe57e0ca5b805cf74cf1efdcbb93e10d72a7e1 Mon Sep 17 00:00:00 2001 From: Mathieu Lirzin Date: Wed, 13 Jul 2016 18:34:08 +0200 Subject: cuirass: Fix 'show-help'. --- bin/cuirass.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'bin') diff --git a/bin/cuirass.in b/bin/cuirass.in index e38449a..180ecd3 100644 --- a/bin/cuirass.in +++ b/bin/cuirass.in @@ -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 -- cgit v1.2.3