gnu: samba: Augment dynamic library rpaths.

* gnu/packages/samba.scm (samba): Augment the rpath of files in lib/ in
  addition to those in bin/ and sbin/.
This commit is contained in:
Taylan Ulrich Bayırlı/Kammer 2015-03-10 19:37:57 +01:00
parent 8c9653b373
commit 2d8288040b
1 changed files with 4 additions and 2 deletions

View File

@ -114,11 +114,13 @@ anywhere.")
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(lib (string-append out "/lib"))) (lib (string-append out "/lib")))
;; Add LIB to the RUNPATH of all the executables. ;; Add LIB to the RUNPATH of all the executables and
;; dynamic libraries.
(with-directory-excursion out (with-directory-excursion out
(for-each (cut augment-rpath <> lib) (for-each (cut augment-rpath <> lib)
(append (find-files "bin" ".*") (append (find-files "bin" ".*")
(find-files "sbin" ".*")))))) (find-files "sbin" ".*")
(find-files "lib" ".*"))))))
%standard-phases)) %standard-phases))
#:modules ((guix build gnu-build-system) #:modules ((guix build gnu-build-system)