@@ -1986,6 +1986,40 @@ (define-public stumpish
(description "This package provides a StumpWM interactive shell.")
(license (list license:gpl2+ license:gpl3+ license:bsd-2))))
+(define-public sbcl-stumpwm-pamixer
+ (let ((commit "aa820533c80ea1af5a0e107cea25eaf34e69dc24")
+ (revision "1"))
+ (package
+ (name "sbcl-stumpwm-pamixer")
+ (version (git-version "0.1.1" revision commit))
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/Junker/stumpwm-pamixer")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "0djcrr16bx40l7b60d4j507vk5l42fdgmjpgrnk86z1ba8wlqim8"))))
+ (inputs `(("stumpwm:lib" ,stumpwm "lib")
+ ("pamixer", pamixer)))
+ (build-system asdf-build-system/sbcl)
+ (arguments
+ `(#:asd-systems '(:pamixer)
+ #:phases
+ ,#~(modify-phases %standard-phases
+ (add-after 'unpack 'patch-pamixer
+ (lambda _
+ (substitute* "pamixer.lisp"
+ (("\"pamixer \"")
+ (string-append
+ "\"" #$pamixer "/bin/pamixer \""))))))))
+ (home-page "https://github.com/Junker/stumpwm-pamixer")
+ (synopsis "StumpWM Pamixer Module")
+ (description "Minimalistic Pulseaudio volume and microphone control
+module for StumpWM.")
+ (license license:gpl3))))
+
(define-public sbcl-stumpwm+slynk
(deprecated-package "sbcl-stumpwm-with-slynk" stumpwm+slynk))