Subject: [bug#72452] [PATCH v2] gnu: add guile-swayer

From: mrh <[email-masked]>
Date: Sat, 7 Sep 2024 18:28:57 +0000

From: Alec Barreto <[email-masked]>

Change-Id: Ibd3817842e36fa35a3f1ecc09288549c10fd0d12
---
 gnu/packages/guile-xyz.scm | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 6204261cd5..3a40c4f29d 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -50,6 +50,7 @@
 ;;; Copyright © 2024 Ilya Chernyshov <[email-masked]>
 ;;; Copyright © 2024 Artyom Bologov <[email-masked]>
 ;;; Copyright © 2024 Felix Lechner <[email-masked]>
+;;; Copyright © 2024 Alec Barreto <[email-masked]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -93,7 +94,7 @@ (define-module (gnu packages guile-xyz)
   #:use-module (gnu packages gstreamer)
   #:use-module (gnu packages gtk)
   #:use-module (gnu packages guile)
-  #:use-module (gnu packages haskell-xyz)         ;pandoc
+  #:use-module (gnu packages haskell-xyz) ;pandoc
   #:use-module (gnu packages image)
   #:use-module (gnu packages imagemagick)
   #:use-module (gnu packages libevent)
@@ -1027,6 +1028,28 @@ (define-public guile2.2-filesystem
     (name "guile2.2-filesystem")
     (inputs (list guile-2.2))))
 
+(define-public guile-swayer
+  (package
+    (name "guile-swayer")
+    (version "0.2.0")
+    (home-page "https://github.com/ebeem/guile-swayer")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/ebeem/guile-swayer")
+             (commit "9c962281f405453fb3770dd0546ef6951c9236dd")))
+       (sha256
+        (base32 "09c0143q9sm75xp1qz7a7ihdqfwqg4w8nlq0mmnivhvamww775ss"))))
+    (native-inputs (list guile-3.0))
+    (build-system guile-build-system)
+    (synopsis "Extensible Guile bindings for SwayWM")
+    (description
+     "This package provides extensible Guile bindings for the Sway window
+manager.  It can be used to query Sway, assign keybindings and listen to
+events in Guile.")
+    (license license:expat)))
+
 (define-public guile-syntax-highlight
   (package
     (name "guile-syntax-highlight")

base-commit: ed95ddeb1e58c314f2e22b4cd35986042f3e2f21
-- 
2.45.2