diff options
| author | Efraim Flashner <efraim@flashner.co.il> | 2016-10-23 10:21:58 +0300 |
|---|---|---|
| committer | Efraim Flashner <efraim@flashner.co.il> | 2016-10-23 14:37:35 +0300 |
| commit | 04014de6f555e21cccb056650f334be316390b5c (patch) | |
| tree | e35596fcdedc53a319868eea00aeaf8c7e22bbac | |
| parent | eccd1d24c9d5988557f03b058a7bc7e482a119f7 (diff) | |
| download | gnu-guix-04014de6f555e21cccb056650f334be316390b5c.tar gnu-guix-04014de6f555e21cccb056650f334be316390b5c.tar.gz | |
gnu: hop: Use 'modify-phases' syntax.
* gnu/packages/scheme.scm (hop)[arguments]: Use 'modify-phases' syntax.
| -rw-r--r-- | gnu/packages/scheme.scm | 25 |
1 files changed, 12 insertions, 13 deletions
diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm index c8e747d02d..30981b77a9 100644 --- a/gnu/packages/scheme.scm +++ b/gnu/packages/scheme.scm @@ -295,19 +295,18 @@ Scheme and C programs and between Scheme and Java programs.") (build-system gnu-build-system) (arguments `(#:phases - (alist-replace - 'configure - (lambda* (#:key outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out"))) - (zero? - (system* "./configure" - (string-append "--prefix=" out) - (string-append "--blflags=" - ;; user flags completely override useful - ;; default flags, so repeat them here. - "-copt \\$(CPICFLAGS) -L\\$(BUILDLIBDIR) " - "-ldopt -Wl,-rpath," out "/lib"))))) - %standard-phases) + (modify-phases %standard-phases + (replace 'configure + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (zero? + (system* "./configure" + (string-append "--prefix=" out) + (string-append "--blflags=" + ;; user flags completely override useful + ;; default flags, so repeat them here. + "-copt \\$(CPICFLAGS) -L\\$(BUILDLIBDIR) " + "-ldopt -Wl,-rpath," out "/lib"))))))) #:tests? #f)) ; no test suite (inputs `(("avahi" ,avahi) ("bigloo" ,bigloo) |