ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-27 14:52:05 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: amssynth: Update to 1.12.2.

Browse source 
* gnu/packages/music.scm (amsynth): Update to 1.12.2.
[arguments]: Adjust 'patch-file-names' phase.
[inputs]: Remove GTKMM-2 and LASH.
[propagated-inputs]: New field.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Thomas Albers 2021-10-01 01:11:44 +02:00 committed by Ludovic Courtès
parent 085a8a0cdf
commit 5a1cf7d315
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 15 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
gnu/packages/music.scm
View file

@ -43,6 +43,7 @@
;;; Copyright © 2021 Felix Gruber <felgru@posteo.net>
;;; Copyright © 2021 Simon Streit <simon@netpanic.org>
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
;;; Copyright © 2021 Thomas Albers Raviola <thomas@thomaslabs.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -2310,38 +2311,43 @@ (define-public padthv1
(define-public amsynth
(package
(name "amsynth")
(version "1.7.1")
(version "1.12.2")
(source
(origin
(method url-fetch)
(uri (string-append "https://github.com/amsynth/amsynth/releases/"
"download/release-" version
"/amsynth-" version ".tar.bz2"))
"/amsynth-" version ".tar.gz"))
(sha256
(base32
"1882pfcmf3rqg3vd4qflzkppcv158d748i603spqjbxqi8z7x7w0"))))
"0lhp7fymm2fids02y43cy422jzmdiraszll1mk3gzlbfwg33ds1i"))))
(build-system gnu-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-file-names
(lambda _
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/GUI/editor_pane.c"
(("/usr/bin/unzip") (which "unzip")))
(substitute* "src/GUI/GUI.cc"
(("/usr/bin/which") (which "which")))
(("/usr/bin/unzip")
(string-append (assoc-ref inputs "unzip") "/bin/unzip")))
(substitute* "src/GUI/MainMenu.cpp"
(("/usr/bin/which")
(string-append (assoc-ref inputs "which") "/bin/which")))
#t)))))
(inputs
`(("alsa-lib" ,alsa-lib)
("gtk+" ,gtk+-2)
("gtkmm" ,gtkmm-2)
("jack" ,jack-1)
("lash" ,lash)
("libsndfile" ,libsndfile)
("lv2" ,lv2)
;; External commands invoked at run time.
("unzip" ,unzip)
("which" ,which)))
(propagated-inputs
;; avoid runtime error:
;; GLib-GIO-ERROR **: 22:14:48.344: Settings schema
;; 'org.gnome.desktop.interface' is not installed
`(("gsettings-desktop-schemas" ,gsettings-desktop-schemas)))
(native-inputs
`(("intltool" ,intltool)
("pkg-config" ,pkg-config)))