~ruther/guix-local: gnu: guile-mqtt: Patch extension path.

ee0a39cc03abc67555cd2c8a907a1122e70be9a6 — Evgeny Pisemsky 1 year, 2 months ago 64ac509

gnu: guile-mqtt: Patch extension path.

* gnu/packages/guile-xyz.scm (guile-mqtt): Patch extension path.
[arguments]: Add 'patch-extension-path phase.

Change-Id: Ifbbd0adebcf82a36f674ab3fded3db5ba04b98b0
Signed-off-by: Zheng Junjie <z572@z572.online>

patch browse .tar.gz .zip

1 files changed, 12 insertions(+), 1 deletions(-)

M gnu/packages/guile-xyz.scm

M gnu/packages/guile-xyz.scm => gnu/packages/guile-xyz.scm +12 -1

@@ 1658,7 1658,18 @@ the Guile compiler tower to generate the DSL from AWS JSON specifications.")
     (build-system gnu-build-system)
     (arguments
      (list
-      #:make-flags #~(list "GUILE_AUTO_COMPILE=0")))
+      #:make-flags
+      #~(list "GUILE_AUTO_COMPILE=0")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack '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))
     (inputs (list mosquitto))
     (home-page "https://github.com/mdjurfeldt/guile-mqtt")