branch master updated: gnu: sdl-mixer: Fix fluidsynth in dependents.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

dannym pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new fa0c1a2  gnu: sdl-mixer: Fix fluidsynth in dependents.
fa0c1a2 is described below

commit fa0c1a21c96626ea054442e92f8d0d0009da8e1f
Author: Danny Milosavljevic <address@hidden>
AuthorDate: Tue Jan 7 16:50:48 2020 +0100

    gnu: sdl-mixer: Fix fluidsynth in dependents.
    
    Fixes <https://bugs.gnu.org/39008>.
    Reported by Pierre Neidhardt <address@hidden>.
    
    * gnu/packages/sdl.scm (sdl-mixer)[arguments]<#:phases>[fix-fluidsynth]: New
    phase.
---
 gnu/packages/sdl.scm | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/sdl.scm b/gnu/packages/sdl.scm
index 727a276..df86d67 100644
--- a/gnu/packages/sdl.scm
+++ b/gnu/packages/sdl.scm
@@ -270,7 +270,18 @@ WEBP, XCF, XPM, and XV.")
          "--disable-music-flac-shared"
          "--disable-music-fluidsynth-shared"
          "--disable-music-mod-shared"
-         "--disable-music-ogg-shared")))
+         "--disable-music-ogg-shared")
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'fix-fluidsynth
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "configure"
+              (("EXTRA_LDFLAGS -lfluidsynth")
+               (string-append "EXTRA_LDFLAGS "
+                              "-L"
+                              (assoc-ref inputs "fluidsynth")
+                              "/lib -lfluidsynth")))
+             #t)))))
     (inputs
      `(("fluidsynth" ,fluidsynth)
        ("libflac" ,flac)