From 0b1f0d36b1219710d6e9e1cd15fbabe729d374e0 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Mon, 28 Sep 2015 21:58:26 +0200 Subject: gnu: lsh: 'lsh-authorize' uses the absolute file name of 'sexp-conv'. Fixes . Reported by Andreas Enge . * gnu/packages/lsh.scm (lsh)[arguments]: In 'pre-configure' phase, change 'src/lsh-authorize' to use the absolute file name of 'sexp-conv'. --- gnu/packages/lsh.scm | 19 ++++++++++++------- 1 file changed, 12 insertions(+), 7 deletions(-) diff --git a/gnu/packages/lsh.scm b/gnu/packages/lsh.scm index 0edf6b4382..e034d66940 100644 --- a/gnu/packages/lsh.scm +++ b/gnu/packages/lsh.scm @@ -116,14 +116,19 @@ basis for almost any application.") (alist-cons-before 'configure 'pre-configure (lambda* (#:key inputs #:allow-other-keys) - ;; Make sure 'lsh' and 'lshd' pick 'sexp-conv' in the right place by - ;; default. - (substitute* "src/environ.h.in" - (("^#define PATH_SEXP_CONV.*") - (let* ((nettle (assoc-ref inputs "nettle")) - (sexp-conv (string-append nettle "/bin/sexp-conv"))) + (let* ((nettle (assoc-ref inputs "nettle")) + (sexp-conv (string-append nettle "/bin/sexp-conv"))) + ;; Make sure 'lsh' and 'lshd' pick 'sexp-conv' in the right place + ;; by default. + (substitute* "src/environ.h.in" + (("^#define PATH_SEXP_CONV.*") (string-append "#define PATH_SEXP_CONV \"" - sexp-conv "\"\n")))) + sexp-conv "\"\n"))) + + ;; Same for the 'lsh-authorize' script. + (substitute* "src/lsh-authorize" + (("=sexp-conv") + (string-append "=" sexp-conv)))) ;; Tests rely on $USER being set. (setenv "USER" "guix")) -- cgit 1.4.1