From 64c64d8d7158e29a09e579be113bfe5e9681cd5d Mon Sep 17 00:00:00 2001
From: Mathieu Lirzin <mthl@gnu.org>
Date: Sun, 12 Jun 2016 00:21:22 +0200
Subject: [PATCH] cuirass: Fix 'show-help' argument.

* bin/cuirass.in (show-help): Remove reference to unbound variable
'program-name'.  Turn PROG into a mandatory argument.
---
 bin/cuirass.in | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/cuirass.in b/bin/cuirass.in
index 9e0cf2b..d3d585a 100644
--- a/bin/cuirass.in
+++ b/bin/cuirass.in
@@ -27,7 +27,7 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@"
              (ice-9 getopt-long)
              (ice-9 match))
 
-(define* (show-help #:optional (prog (program-name)))
+(define* (show-help prog)
   (simple-format #t "Usage: ~a [OPTIONS] [CACHEDIR]" prog)
   (display "
 Run Guix job from a git repository cloned in CACHEDIR.