05/06: gnu: Add sbcl-stumpwm-stumptray.

[guix-commits]

wigust pushed a commit to branch master
in repository guix.

commit 1afe58e47f181729d06f44f127468ea05a28d035
Author: Katherine Cox-Buday <cox.katherine.e@gmail.com>
AuthorDate: Thu Jun 4 17:41:43 2020 -0500

    gnu: Add sbcl-stumpwm-stumptray.
    
    * gnu/packages/wm.scm (sbcl-stumpwm-stumptray): New variable.
    
    Signed-off-by: Oleg Pykhalov <go.wigust@gmail.com>
---
 gnu/packages/wm.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm
index b1747d6..723c0dd 100644
--- a/gnu/packages/wm.scm
+++ b/gnu/packages/wm.scm
@@ -1819,6 +1819,28 @@ between windows.")
      (filter (lambda (a) (string-contains a "linux")) %supported-systems))
     (license license:gpl3+)))
 
+(define-public sbcl-stumpwm-stumptray
+  (package
+    (inherit stumpwm-contrib)
+    (name "sbcl-stumpwm-stumptray")
+    (arguments
+     '(#:asd-system-name "stumptray"
+       #:tests? #f
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'chdir (lambda _ (chdir "modeline/stumptray") 
#t)))))
+    (inputs
+     `(("stumpwm" ,stumpwm "lib")
+       ("xembed" ,sbcl-clx-xembed)
+       ("alexandria" ,sbcl-alexandria)))
+    (home-page
+     
"https://github.com/stumpwm/stumpwm-contrib/tree/master/modeline/stumptray";)
+    (synopsis "Modeline support for stumptray connectivity")
+    (description "Modeline support for stumptray connectivity.")
+    (supported-systems
+     (filter (lambda (a) (string-contains a "linux")) %supported-systems))
+    (license license:gpl3+)))
+
 (define-public lemonbar
   (let ((commit "35183ab81d2128dbb7b6d8e119cc57846bcefdb4")
         (revision "1"))