From ef51ca870fdeb8689eee8771000dd13831c0de6d Mon Sep 17 00:00:00 2001 From: Marius Bakke Date: Sun, 27 Nov 2022 15:51:58 +0100 Subject: gnu: sooperlooper: Remove input labels. * gnu/packages/music.scm (sooperlooper)[inputs]: Remove labels. [arguments]: Use SEARCH-INPUT-DIRECTORY instead of labels. --- gnu/packages/music.scm | 30 +++++++++++++++--------------- 1 file changed, 15 insertions(+), 15 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index d88b7bd20e..22b8ca7d68 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -3945,13 +3945,13 @@ with a number of bugfixes and changes to improve IT playback.") (modify-phases %standard-phases (add-after 'unpack 'add-sigc++-includes (lambda* (#:key inputs #:allow-other-keys) - (let ((sig (assoc-ref inputs "libsigc++")) - (xml (assoc-ref inputs "libxml2")) + (let ((sig (search-input-directory inputs "include/sigc++-2.0")) + (xml (search-input-directory inputs "include/libxml2")) (cwd (getcwd))) (setenv "CPATH" - (string-append sig "/include/sigc++-2.0:" - sig "/lib/sigc++-2.0/include:" - xml "/include/libxml2/:" + (string-append sig ":" + sig "../../lib/sigc++-2.0/include:" + xml ":" cwd "/libs/pbd:" cwd "/libs/midi++:" (or (getenv "CPATH") "")))) @@ -3978,16 +3978,16 @@ with a number of bugfixes and changes to improve IT playback.") (("static char") "static const char")) #t))))) (inputs - `(("jack" ,jack-1) - ("alsa-lib" ,alsa-lib) - ("wxwidgets" ,wxwidgets-gtk2) - ("libsndfile" ,libsndfile) - ("libsamplerate" ,libsamplerate) - ("liblo" ,liblo) - ("rubberband" ,rubberband) - ("libxml2" ,libxml2) - ("libsigc++" ,libsigc++-2) - ("ncurses" ,ncurses))) + (list jack-1 + alsa-lib + wxwidgets-gtk2 + libsndfile + libsamplerate + liblo + rubberband + libxml2 + libsigc++-2 + ncurses)) (native-inputs (list pkg-config)) (home-page "https://sonosaurus.com/sooperlooper/") -- cgit 1.4.1