gnu: icu4c: Avoid use of 'patchelf'; fix build on ARM systems.

* gnu/packages/icu4c.scm (icu4c)[inputs]: Remove patchelf.
  [configure-flags]: Add --enable-rpath.  Add --with-data-packaging=archive
  on arm systems.
  [phases]: Remove 'add-lib-to-runpath' phase.
This commit is contained in:
Mark H Weaver 2015-01-05 19:50:25 +00:00
parent cf0a154c41
commit 0d93648bec
1 changed files with 9 additions and 22 deletions

View File

@ -1,5 +1,6 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2013 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -18,7 +19,6 @@
(define-module (gnu packages icu4c) (define-module (gnu packages icu4c)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages elf)
#:use-module (gnu packages perl) #:use-module (gnu packages perl)
#:use-module (guix licenses) #:use-module (guix licenses)
#:use-module (guix packages) #:use-module (guix packages)
@ -40,16 +40,14 @@
(base32 "1cwapgjmvrcv1n2wjspj3vahidg596gjfp4jn1gcb4baralcjayl")))) (base32 "1cwapgjmvrcv1n2wjspj3vahidg596gjfp4jn1gcb4baralcjayl"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (inputs
`(("patchelf" ,patchelf) `(("perl" ,perl)))
("perl" ,perl)))
(arguments (arguments
`(#:modules ((guix build gnu-build-system) `(#:configure-flags
(guix build utils) '("--enable-rpath"
(guix build rpath) ,@(if (string-prefix? "arm" (or (%current-target-system)
(srfi srfi-26)) (%current-system)))
#:imported-modules ((guix build gnu-build-system) '("--with-data-packaging=archive")
(guix build utils) '()))
(guix build rpath))
#:phases #:phases
(alist-cons-after (alist-cons-after
'unpack 'chdir-to-source 'unpack 'chdir-to-source
@ -62,18 +60,7 @@
(substitute* "configure" (substitute* "configure"
(("`/bin/sh") (("`/bin/sh")
(string-append "`" (which "bash"))))) (string-append "`" (which "bash")))))
(alist-cons-after %standard-phases))))
'strip 'add-lib-to-runpath
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(lib (string-append out "/lib")))
;; Add LIB to the RUNPATH of all the libraries and binaries.
(with-directory-excursion out
(for-each (cut augment-rpath <> lib)
(append (find-files "lib" ".*")
(find-files "bin" ".*")
(find-files "sbin" ".*"))))))
%standard-phases)))))
(synopsis "International Components for Unicode") (synopsis "International Components for Unicode")
(description (description
"ICU is a set of C/C++ and Java libraries providing Unicode and "ICU is a set of C/C++ and Java libraries providing Unicode and