01/01: gnu: samba: Augment dynamic library rpaths.

[Taylan Ulrich B.]

taylanub pushed a commit to branch master
in repository guix.

commit 2d8288040b83c31eb564630d7e3a8ba46e14599d
Author: Taylan Ulrich Bayırlı/Kammer <address@hidden>
Date:   Tue Mar 10 19:37:57 2015 +0100

    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/.
---
 gnu/packages/samba.scm |    6 ++++--
 1 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/samba.scm b/gnu/packages/samba.scm
index 46b9721..c147abc 100644
--- a/gnu/packages/samba.scm
+++ b/gnu/packages/samba.scm
@@ -114,11 +114,13 @@ anywhere.")
                   (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.
+                      ;; Add LIB to the RUNPATH of all the executables and
+                      ;; dynamic libraries.
                       (with-directory-excursion out
                         (for-each (cut augment-rpath <> lib)
                                   (append (find-files "bin" ".*")
-                                          (find-files "sbin" ".*"))))))
+                                          (find-files "sbin" ".*")
+                                          (find-files "lib" ".*"))))))
                   %standard-phases))
 
        #:modules ((guix build gnu-build-system)