02/08: gnu: ganv: Set the RUNPATH of binaries to $libdir.

[Ludovic Courtès]

civodul pushed a commit to branch core-updates
in repository guix.

commit ea7f3349ba59cb56087d3ca3ab4c101f372d0eac
Author: Ludovic Courtès <address@hidden>
Date:   Fri May 1 16:01:49 2015 +0200

    gnu: ganv: Set the RUNPATH of binaries to $libdir.
    
    * gnu/packages/gtk.scm (ganv)[arguments]: Add 'set-ldflags' phase.
---
 gnu/packages/gtk.scm |   14 +++++++++++---
 1 files changed, 11 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/gtk.scm b/gnu/packages/gtk.scm
index 0f7ba86..8a5a309 100644
--- a/gnu/packages/gtk.scm
+++ b/gnu/packages/gtk.scm
@@ -230,13 +230,21 @@ functions which were removed.")
     (source (origin
               (method url-fetch)
               (uri (string-append "http://download.drobilla.net/ganv-";
-                                  version
-                                  ".tar.bz2"))
+                                  version ".tar.bz2"))
               (sha256
                (base32
                 "0g7s5mp14qgbfjdql0k1s8464r21g47ssn5dws6jazsnw6njhl0l"))))
     (build-system waf-build-system)
-    (arguments `(#:tests? #f)) ; no check target
+    (arguments
+     `(#:phases (alist-cons-before
+                 'configure 'set-ldflags
+                 (lambda* (#:key outputs #:allow-other-keys)
+                   ;; Allow 'bin/ganv_bench' to find libganv-1.so.
+                   (setenv "LDFLAGS"
+                           (string-append "-Wl,-rpath="
+                                          (assoc-ref outputs "out") "/lib")))
+                 %standard-phases)
+       #:tests? #f)) ; no check target
     (inputs
      `(("gtk" ,gtk+-2)
        ("gtkmm" ,gtkmm-2)))