From fa0c1a21c96626ea054442e92f8d0d0009da8e1f Mon Sep 17 00:00:00 2001
From: Danny Milosavljevic <dannym@scratchpost.org>
Date: Tue, 7 Jan 2020 16:50:48 +0100
Subject: gnu: sdl-mixer: Fix fluidsynth in dependents.

Fixes <https://bugs.gnu.org/39008>.
Reported by Pierre Neidhardt <mail@ambrevar.xyz>.

* gnu/packages/sdl.scm (sdl-mixer)[arguments]<#:phases>[fix-fluidsynth]: New
phase.
---
 gnu/packages/sdl.scm | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

(limited to 'gnu/packages/sdl.scm')

diff --git a/gnu/packages/sdl.scm b/gnu/packages/sdl.scm
index 727a276dc5..df86d677ee 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)
-- 
cgit 1.4.1