[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: glibc-locales: Use 'modify-phases' syntax.
From: |
Efraim Flashner |
Subject: |
01/01: gnu: glibc-locales: Use 'modify-phases' syntax. |
Date: |
Fri, 6 Oct 2017 09:00:34 -0400 (EDT) |
efraim pushed a commit to branch master
in repository guix.
commit 2320d4f0581bd996f38b2be6c6f513545cf160ec
Author: Efraim Flashner <address@hidden>
Date: Fri Oct 6 15:42:00 2017 +0300
gnu: glibc-locales: Use 'modify-phases' syntax.
* gnu/packages/base.scm (glibc-locales)[arguments]: Use 'modify-phases'
syntax.
---
gnu/packages/base.scm | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index 972ffee..bc74535 100644
--- a/gnu/packages/base.scm
+++ b/gnu/packages/base.scm
@@ -883,12 +883,12 @@ the 'share/locale' sub-directory of this package.")
,@(package-arguments glibc))))
(substitute-keyword-arguments args
((#:phases phases)
- `(alist-replace
- 'build
- (lambda* (#:key outputs #:allow-other-keys)
- (zero? (system* "make" "localedata/install-locales"
- "-j" (number->string (parallel-job-count)))))
- (alist-delete 'install ,phases)))
+ `(modify-phases ,phases
+ (replace 'build
+ (lambda _
+ (zero? (system* "make" "localedata/install-locales"
+ "-j" (number->string (parallel-job-count))))))
+ (delete 'install)))
((#:configure-flags flags)
`(append ,flags
;; Use $(libdir)/locale/X.Y as is the case by default.