diff options
author | Efraim Flashner <efraim@flashner.co.il> | 2017-10-06 15:42:00 +0300 |
---|---|---|
committer | Efraim Flashner <efraim@flashner.co.il> | 2017-10-06 16:00:11 +0300 |
commit | 2320d4f0581bd996f38b2be6c6f513545cf160ec (patch) | |
tree | 652524db16224e76feeee344e4ee069e9c7c5a58 | |
parent | 1738e24455cd43f4e8c061fdf377331550c1f99b (diff) | |
download | 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.scm | 12 |
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. |