GNU bug report logs - #78652
[PATCH] gnu: guile-mqtt: Update to 1.0.0.

Previous Next

To reply to this bug, email your comments to 78652 AT debbugs.gnu.org.
There is no need to reopen the bug first.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Evgeny Pisemsky <mail <at> pisemsky.site>
To: guix-patches <at> gnu.org
Subject: [PATCH] gnu: guile-mqtt: Update to 1.0.0.
Date: Sat, 31 May 2025 19:54:55 +0300

* gnu/packages/guile-xyz.scm (guile-mqtt): Update to 1.0.0.
[source]: Fetch from git repository.
[arguments]: Patch extension path before build.
[native-inputs]: Add autoconf, automake, nyacc-2.01, texinfo.

Change-Id: I04c5a65a6568b94cf7309b5a8b6ccfa31d5c9c4e
---
 gnu/packages/guile-xyz.scm | 37 +++++++++++++++++++++++--------------
 1 file changed, 23 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index e6aea6d67b..b25061eb07 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -1652,15 +1652,16 @@ (define-public guile-aws
 (define-public guile-mqtt
   (package
     (name "guile-mqtt")
-    (version "0.2.1")
+    (version "1.0.0")
     (source
      (origin
-       (method url-fetch)
-       (uri (string-append "https://github.com/mdjurfeldt/" name
-                           "/releases/download/v" version
-                           "/" name "-" version ".tar.gz"))
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/mdjurfeldt/guile-mqtt")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
        (sha256
-        (base32 "16a3r6yk41yskwv4qbkrsi0f5rvc7aw2s5di74i8y89j1x9yp9zs"))))
+        (base32 "1lvxic93cyzhdq7gb22pfz5j5pf7b1pcv0ahblkan8jbhzpqxvm0"))))
     (build-system gnu-build-system)
     (arguments
      (list
@@ -1668,15 +1669,23 @@ (define-public guile-mqtt
       #~(list "GUILE_AUTO_COMPILE=0")
       #:phases
       #~(modify-phases %standard-phases
-          (add-after 'unpack 'patch-extension-path
+          (add-before 'build 'patch-extension-path
             (lambda* (#:key inputs #:allow-other-keys)
-              (substitute* "module/ffi/mosquitto.scm"
-                (("list #f \"libmosquitto\"")
-                 (string-append
-                  "list #f \""
-                  (search-input-file inputs "/lib/libmosquitto.so")
-                  "\""))))))))
-    (native-inputs (list guile-3.0 pkg-config))
+              (setenv "HOME" "/tmp")
+              (with-directory-excursion "module"
+                (invoke "make" "ffi/mosquitto.scm")
+                (substitute* "ffi/mosquitto.scm"
+                  (("list #f \"libmosquitto\"")
+                   (string-append
+                    "list #f \""
+                    (search-input-file inputs "/lib/libmosquitto.so")
+                    "\"")))))))))
+    (native-inputs (list autoconf
+                         automake
+                         guile-3.0
+                         nyacc-2.01
+                         pkg-config
+                         texinfo))
     (inputs (list mosquitto))
     (home-page "https://github.com/mdjurfeldt/guile-mqtt")
     (synopsis "Guile bindings for the libmosquitto library")

base-commit: d8693b3c8666450b39c81b9f59541a2b6f7100fe
-- 
2.49.0

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.