gnu: libsigsegv: Use 'modify-phases' syntax.

* gnu/packages/libsigsegv.scm (libsigsegv)[arguments]: Use
'modify-phases' syntax.
This commit is contained in:
Efraim Flashner 2017-04-16 19:14:17 +03:00
parent 74f04d8556
commit 0c1a9438dd
No known key found for this signature in database
GPG Key ID: F4C1D3917EACEE93

View File

@ -1,5 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@ -44,12 +45,12 @@ (define-public libsigsegv
;; linux-libre-headers-cross-mips64el-linux-gnu-3.3.8/include/asm/sigcontext.h:57:8: error: redefinition of 'struct sigcontext'
(if (string-contains (or (%current-target-system) (%current-system))
"mips64el")
`(#:phases (alist-cons-before
'configure 'patch-mips-old-h
(lambda _
(substitute* "src/fault-linux-mips-old.h"
(("#include <asm/sigcontext\\.h>") "")))
%standard-phases))
`(#:phases (modify-phases %standard-phases
(add-before 'configure 'patch-mips-old-h
(lambda _
(substitute* "src/fault-linux-mips-old.h"
(("#include <asm/sigcontext\\.h>") ""))
#t))))
'()))
(description
"GNU libsigsegv is a library to handle page faults, which occur when a