aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/elf.scm
diff options
context:
space:
mode:
authorMarius Bakke <mbakke@fastmail.com>2018-03-19 23:46:25 +0100
committerMarius Bakke <mbakke@fastmail.com>2018-03-20 00:06:34 +0100
commitb1d096f869ed53b84486855d73c7e9070fdf3ae2 (patch)
tree16a0c5cd59fc07d8f433ed6b718609e8a7450eb3 /gnu/packages/elf.scm
parent24a2e9172a2d8970d57865c6130f2184385183a3 (diff)
downloadgnu-guix-b1d096f869ed53b84486855d73c7e9070fdf3ae2.tar
gnu-guix-b1d096f869ed53b84486855d73c7e9070fdf3ae2.tar.gz
Revert "gnu: patchelf: Update argument phase."
It causes too many rebuilds this late in the 'staging' cycle. This reverts commit c1d1cd817c7ab8d99e962e286c207943765a8e8f.
Diffstat (limited to 'gnu/packages/elf.scm')
-rw-r--r--gnu/packages/elf.scm14
1 files changed, 8 insertions, 6 deletions
diff --git a/gnu/packages/elf.scm b/gnu/packages/elf.scm
index 08d92532fa..253547e70f 100644
--- a/gnu/packages/elf.scm
+++ b/gnu/packages/elf.scm
@@ -128,12 +128,14 @@ Executable and Linkable Format (@dfn{ELF}). This includes @command{ld},
'()))
(arguments
(if (target-arm32?)
- `(#:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'patch/rework-for-arm
- (lambda* (#:key inputs #:allow-other-keys)
- (let ((patch-file (assoc-ref inputs "patch/rework-for-arm")))
- (invoke "patch" "--force" "-p1" "--input" patch-file))))))
+ `(#:phases (alist-cons-after
+ 'unpack 'patch/rework-for-arm
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((patch-file
+ (assoc-ref inputs "patch/rework-for-arm")))
+ (zero? (system* "patch" "--force" "-p1"
+ "--input" patch-file))))
+ %standard-phases))
'()))
(home-page "https://nixos.org/patchelf.html")