Subject: [PATCH] gnu: Add guile-mqtt.

From: Evgeny Pisemsky <[email-masked]>
Date: Sat, 15 Feb 2025 12:46:34 +0300

* gnu/packages/guile-xyz.scm (guile-mqtt): New variable.

Change-Id: I3e9d4ebdb2357023f77962b9d40e3b10242aeac3
---
 gnu/packages/guile-xyz.scm | 29 ++++++++++++++++++++++++++++-
 1 file changed, 28 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 295f69d2de..6c2a6d8d9c 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -44,7 +44,7 @@
 ;;; Copyright © 2022 Antero Mejr <[email-masked]>
 ;;; Copyright © 2022 Taiju HIGASHI <[email-masked]>
 ;;; Copyright © 2022, 2023 Zheng Junjie <[email-masked]>
-;;; Copyright © 2022 Evgeny Pisemsky <[email-masked]>
+;;; Copyright © 2022, 2025 Evgeny Pisemsky <[email-masked]>
 ;;; Copyright © 2022 jgart <[email-masked]>
 ;;; Copyright © 2023 Andrew Tropin <[email-masked]>
 ;;; Copyright © 2024 Ilya Chernyshov <[email-masked]>
@@ -106,6 +106,7 @@ (define-module (gnu packages guile-xyz)
   #:use-module (gnu packages man)
   #:use-module (gnu packages maths)
   #:use-module (gnu packages mes)
+  #:use-module (gnu packages messaging)
   #:use-module (gnu packages mp3)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages ncurses)
@@ -1557,6 +1558,32 @@ (define-public guile-aws
 the Guile compiler tower to generate the DSL from AWS JSON specifications.")
       (license license:gpl3+))))
 
+(define-public guile-mqtt
+  (package
+    (name "guile-mqtt")
+    (version "0.2.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://github.com/mdjurfeldt/" name
+                           "/releases/download/v" version
+                           "/" name "-" version ".tar.gz"))
+       (sha256
+        (base32 "16a3r6yk41yskwv4qbkrsi0f5rvc7aw2s5di74i8y89j1x9yp9zs"))))
+    (build-system gnu-build-system)
+    (arguments
+     (list
+      #:make-flags #~(list "GUILE_AUTO_COMPILE=0")))
+    (native-inputs (list guile-3.0 pkg-config))
+    (inputs (list mosquitto))
+    (home-page "https://github.com/mdjurfeldt/guile-mqtt")
+    (synopsis "Guile bindings for the libmosquitto library")
+    (description
+     "This package provides Guile bindings for the libmosquitto MQTT client library.
+The bindings are written in GOOPS, and the user can extend the client class by
+inheritance.")
+    (license license:lgpl3+)))
+
 (define-public guile-simple-zmq
   (let ((commit "d25d1865e3378d93c44e2b4f5246a70b078a489d")
         (revision "11"))

base-commit: 9b1fe3bd70a57cdbf99339eb06b3a9b57f060f97
-- 
2.48.1