gnu: Add pulsemixer.

* gnu/packages/pulseaudio.scm (pulsemixer): New variable.
This commit is contained in:
Leo Famulari 2017-10-02 17:52:34 -04:00
parent 1ba940b58b
commit df71c88c3a
No known key found for this signature in database
GPG key ID: 2646FA30BACA7F08

View file

@ -27,6 +27,7 @@ (define-module (gnu packages pulseaudio)
#:use-module (guix download) #:use-module (guix download)
#:use-module ((guix licenses) #:prefix l:) #:use-module ((guix licenses) #:prefix l:)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system python)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages algebra) #:use-module (gnu packages algebra)
#:use-module (gnu packages autotools) #:use-module (gnu packages autotools)
@ -259,3 +260,33 @@ (define-public ponymix
command-line interface. In addition, it is possible to use named sources and command-line interface. In addition, it is possible to use named sources and
sinks.") sinks.")
(license l:expat))) (license l:expat)))
(define-public pulsemixer
(package
(name "pulsemixer")
(version "1.3.0")
(source (origin
(method url-fetch)
(uri (string-append "https://github.com/GeorgeFilipkin/"
"pulsemixer/archive/" version ".tar.gz"))
(sha256
(base32
"03c94313fhxd5sbkl2ajzb2gmmm4hpv7m5rkbxmahwg9s8ih824r"))))
(build-system python-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-path
(lambda* (#:key inputs #:allow-other-keys)
(let ((pulse (assoc-ref inputs "pulseaudio")))
(substitute* "pulsemixer"
(("libpulse.so.0")
(string-append pulse "/lib/libpulse.so.0")))
#t))))))
(inputs
`(("pulseaudio" ,pulseaudio)))
(home-page "https://github.com/GeorgeFilipkin/pulsemixer/")
(synopsis "Command-line and curses mixer for PulseAudio")
(description "Pulsemixer is a PulseAudio mixer with command-line and
curses-style interfaces.")
(license l:expat)))