gnu: helm: fix not finding Factory Presets

* gnu/packages/music.scm (helm): Fix not finding Factory Presets.
  This change fixes hardcoded paths so that Factory Presets can be found.

Signed-off-by: Nicolas Goaziou <mail@nicolasgoaziou.fr>
This commit is contained in:
Sughosha via Guix-patches via 2022-10-11 18:34:21 +00:00 committed by Nicolas Goaziou
parent d231651696
commit 6db22e5262
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D

View file

@ -6109,21 +6109,21 @@ (define-public helm
(name "helm")
(version "0.9.0")
(source
(origin
(method git-fetch)
(uri
(git-reference
(url "https://github.com/mtytel/helm")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"17ys2vvhncx9i3ydg3xwgz1d3gqv4yr5mqi7vr0i0ca6nad6x3d4"))
;; Apply GCC 9 fixes from https://github.com/mtytel/helm/pull/233
(patches (search-patches "helm-fix-gcc-9-build.patch"))))
(origin
(method git-fetch)
(uri
(git-reference
(url "https://github.com/mtytel/helm")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"17ys2vvhncx9i3ydg3xwgz1d3gqv4yr5mqi7vr0i0ca6nad6x3d4"))
;; Apply GCC 9 fixes from https://github.com/mtytel/helm/pull/233
(patches (search-patches "helm-fix-gcc-9-build.patch"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ; no "check" target
`(#:tests? #f ; no "check" target
#:make-flags
(list (string-append "DESTDIR=" (assoc-ref %outputs "out"))
"lv2" "standalone")
@ -6140,6 +6140,11 @@ (define-public helm
(substitute* "Makefile"
(("/usr") ""))
#t))
(add-after 'unpack 'fix-hardcoded-paths
(lambda* (#:key outputs #:allow-other-keys)
(substitute* (list "src/common/load_save.cpp"
"src/editor_sections/patch_browser.cpp")
(("/usr") (assoc-ref outputs "out")))))
(delete 'configure))))
(inputs
`(("alsa-lib" ,alsa-lib)