From ffc72ec6dfb02bca3e282ccc1b6c00da6e7fbcaf Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Wed, 7 Sep 2016 18:27:11 +0200 Subject: [PATCH] gnu: guile-json: Remove hard-coded Guile effective version. * gnu/packages/guile.scm (guile-json)[snippet]: Modify 'ac_subst_vars' in 'configure', and use "@GUILE_EFFECTIVE_VERSION@" instead of "2.0" in 'Makefile.in'. --- gnu/packages/guile.scm | 30 +++++++++++++++++------------- 1 file changed, 17 insertions(+), 13 deletions(-) diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm index 195af54c84..bd9902d427 100644 --- a/gnu/packages/guile.scm +++ b/gnu/packages/guile.scm @@ -514,19 +514,23 @@ for Guile\".") (name "guile-json") (version "0.5.0") (source (origin - (method url-fetch) - (uri (string-append "mirror://savannah/guile-json/guile-json-" - version ".tar.gz")) - (sha256 - (base32 - "0l8a34l92nrdszy7ykycfvr8y0n0yi5qb3ccliycvpvf9mzk5n8d")) - (modules '((guix build utils))) - (snippet - ;; Make sure everything goes under .../site/2.0, like Guile's - ;; search paths expects. - '(substitute* '("Makefile.in" "json/Makefile.in") - (("moddir =.*/share/guile/site" all) - (string-append all "/2.0")))))) + (method url-fetch) + (uri (string-append "mirror://savannah/guile-json/guile-json-" + version ".tar.gz")) + (sha256 + (base32 + "0l8a34l92nrdszy7ykycfvr8y0n0yi5qb3ccliycvpvf9mzk5n8d")) + (modules '((guix build utils))) + (snippet + ;; Make sure everything goes under .../site/X.Y, like Guile's + ;; search paths expects. + '(begin + (substitute* "configure" + (("ac_subst_vars='") + "ac_subst_vars='GUILE_EFFECTIVE_VERSION\n")) + (substitute* '("Makefile.in" "json/Makefile.in") + (("moddir =.*/share/guile/site" all) + (string-append all "/@GUILE_EFFECTIVE_VERSION@"))))))) (build-system gnu-build-system) (native-inputs `(("guile" ,guile-2.0))) (home-page "http://savannah.nongnu.org/projects/guile-json/")