gnu: Add sonata

* gnu/packages/mpd.scm (sonata): New variable.

Signed-off-by: Leo Famulari <leo@famulari.name>
This commit is contained in:
Christopher Baines 2016-09-11 11:00:37 +01:00 committed by Leo Famulari
parent 46ec2707a4
commit 6c86cef5d3
No known key found for this signature in database
GPG Key ID: 2646FA30BACA7F08

View File

@ -27,10 +27,14 @@
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix utils)
#:use-module ((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
#:use-module (guix build-system gnu)
#:use-module (guix build-system python)
#:use-module (gnu packages avahi)
#:use-module (gnu packages boost)
#:use-module (gnu packages gettext)
#:use-module (gnu packages gnome)
#:use-module (gnu packages gtk)
#:use-module (gnu packages icu4c)
#:use-module (gnu packages readline)
#:use-module (gnu packages compression)
@ -263,3 +267,52 @@ interface for the Music Player Daemon.")
(package (inherit mpd2)
(native-inputs `(("python2-setuptools" ,python2-setuptools)
,@(package-native-inputs mpd2))))))
(define-public sonata
(package
(name "sonata")
(version "1.7b1")
(source (origin
(method url-fetch)
(uri
(string-append "https://github.com/multani/sonata/archive/v"
version ".tar.gz"))
(file-name (string-append name "-" version ".tar.gz"))
(sha256
(base32
"07gq2nxqwxs0qyxjbay7k5j25zd386bn7wdr2dl1gk53diwnn7s0"))))
(build-system python-build-system)
(arguments
`(#:modules ((guix build gnu-build-system)
(guix build python-build-system)
((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
(guix build utils))
#:imported-modules (,@%gnu-build-system-modules
(guix build python-build-system)
(guix build glib-or-gtk-build-system))
#:phases
(modify-phases %standard-phases
(add-after 'install 'glib-or-gtk-wrap
(assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))
(add-after 'install 'wrap-sonata
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))
(gi-typelib-path (getenv "GI_TYPELIB_PATH")))
(wrap-program (string-append out "/bin/sonata")
`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path))))
#t)))))
(native-inputs
`(("gettext" ,gnu-gettext)))
(inputs
`(("python-mpd2" ,python-mpd2)
("gtk+" ,gtk+)
("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
("gobject-introspection" ,gobject-introspection)
("adwaita-icon-theme" ,adwaita-icon-theme)
("python-pygobject" ,python-pygobject)))
(synopsis "Elegant client for the Music Player Daemon")
(description "Sonata is an elegant graphical client for the Music Player
Daemon (MPD). It supports playlists, multiple profiles (connecting to different
MPD servers, search and multimedia key support.")
(home-page "http://www.nongnu.org/sonata/")
(license license:gpl3+)))