aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2017-10-06 15:42:00 +0300
committerEfraim Flashner <efraim@flashner.co.il>2017-10-06 16:00:11 +0300
commit2320d4f0581bd996f38b2be6c6f513545cf160ec (patch)
tree652524db16224e76feeee344e4ee069e9c7c5a58
parent1738e24455cd43f4e8c061fdf377331550c1f99b (diff)
downloadguix-2320d4f0581bd996f38b2be6c6f513545cf160ec.tar
guix-2320d4f0581bd996f38b2be6c6f513545cf160ec.tar.gz
gnu: glibc-locales: Use 'modify-phases' syntax.
* gnu/packages/base.scm (glibc-locales)[arguments]: Use 'modify-phases' syntax.
-rw-r--r--gnu/packages/base.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index 972ffeeecb..bc745351af 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.