@@ -50,6 +50,7 @@
;;; Copyright © 2024 Ilya Chernyshov <ichernyshovvv@gmail.com>
;;; Copyright © 2024 Artyom Bologov <mail@aartaka.me>
;;; Copyright © 2024 Felix Lechner <felix.lechner@lease-up.com>
+;;; Copyright © 2024 Alec Barreto <mrh57@posteo.net>
;;;
;;; 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,29 @@ (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 version)))
+ (file-name (git-file-name name version))
+ (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")