ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-25 12:09:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: cdparanoia: Fix links of internal libraries into binary.

Browse source 
* gnu/packages/cdrom.scm (cdparanoia): Use patchelf to link internal libraries
    into binary.
This commit is contained in:
Andreas Enge 2013-10-06 10:01:02 +02:00
parent a5a7d374a1
commit 43824910f2
1 changed files with 24 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
gnu/packages/cdrom.scm
View file

@ -27,10 +27,11 @@ (define-module (gnu packages cdrom)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module ((gnu packages gettext) #:renamer (symbol-prefix-proc 'gnu:)) #:use-module ((gnu packages gettext) #:renamer (symbol-prefix-proc 'gnu:))
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
#:use-module (gnu packages readline)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages help2man) #:use-module (gnu packages help2man)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages patchelf)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages readline)
#:use-module (gnu packages which)) #:use-module (gnu packages which))
(define-public libcddb (define-public libcddb
@ -131,10 +132,29 @@ (define-public cdparanoia
"1pv4zrajm46za0f6lv162iqffih57a8ly4pc69f7y0gfyigb8p80")))) "1pv4zrajm46za0f6lv162iqffih57a8ly4pc69f7y0gfyigb8p80"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (inputs
`(("patch/fpic" ,(search-patch "cdparanoia-fpic.patch")))) `(("patch/fpic" ,(search-patch "cdparanoia-fpic.patch"))
("patchelf" ,patchelf)))
(arguments (arguments
`(#:tests? #f ; there is no check target `(#:tests? #f ; there is no check target
#:patches (list (assoc-ref %build-inputs "patch/fpic")))) #:patches (list (assoc-ref %build-inputs "patch/fpic"))
#:modules ((guix build gnu-build-system)
(guix build utils)
(guix build rpath)
(srfi srfi-26))
#:imported-modules ((guix build gnu-build-system)
(guix build utils)
(guix build rpath))
#:phases
(alist-cons-after
'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 executables.
(with-directory-excursion out
(for-each (cut augment-rpath <> lib)
(find-files "bin" ".*")))))
%standard-phases)))
(home-page "http://www.xiph.org/paranoia/") (home-page "http://www.xiph.org/paranoia/")
(synopsis "audio CD reading utility which includes extra data verification features") (synopsis "audio CD reading utility which includes extra data verification features")
(description "Cdparanoia retrieves audio tracks from CDDA capable CDROM (description "Cdparanoia retrieves audio tracks from CDDA capable CDROM