summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorEvgeny Pisemsky <mail@pisemsky.site>2025-12-28 15:30:15 +0300
committerLudovic Courtès <ludo@gnu.org>2026-03-11 18:27:46 +0100
commit1ec777def84fcce9cfe77acb2ce3112b04b37085 (patch)
tree12d2cd2368a849693160179b4da8147eefe99e7c /gnu
parent62ae9661a2f2620dac1ab7875f7d906c346812e0 (diff)
gnu: guile-usbrelay: Update to 0.1.1.
* gnu/packages/hardware.scm (guile-usbrelay): Update to 0.1.1. [arguments]<#:phases>: ignore lambda arguments and invoke explicit command in 'compile-ffi, add 'install-udev-rules. Change-Id: I8194d662345cfeb9e36816484b0f3d902a2c1a02 Signed-off-by: Ludovic Courtès <ludo@gnu.org> Merges: #5188
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/hardware.scm18
1 files changed, 14 insertions, 4 deletions
diff --git a/gnu/packages/hardware.scm b/gnu/packages/hardware.scm
index 110eebd54da..8688056c251 100644
--- a/gnu/packages/hardware.scm
+++ b/gnu/packages/hardware.scm
@@ -1813,7 +1813,7 @@ package also includes @code{usbrelayd}.")))
(define-public guile-usbrelay
(package
(name "guile-usbrelay")
- (version "0.1.0")
+ (version "0.1.1")
(home-page "https://codeberg.org/pisemsky/guile-usbrelay")
(source
(origin
@@ -1823,7 +1823,7 @@ package also includes @code{usbrelayd}.")))
(commit version)))
(file-name (git-file-name name version))
(sha256
- (base32 "0ndgkazv9bnyj45pccym11245c65hlvsvzmx0acpzlywz7xxyy72"))))
+ (base32 "1nghzsash3z398p2bp2vw0a1rzaclq9a6iqxbm7ffyzbldcca81l"))))
(build-system guile-build-system)
(arguments
(list
@@ -1831,9 +1831,19 @@ package also includes @code{usbrelayd}.")))
#:phases
#~(modify-phases %standard-phases
(add-before 'build 'compile-ffi
- (lambda* (#:key inputs #:allow-other-keys)
+ (lambda _
(setenv "GUILE_AUTO_COMPILE" "0")
- (invoke "guile" "make.scm"))))))
+ (invoke "guild" "compile-ffi" "--no-exec"
+ "modules/usbrelay/ffi/hidapi.ffi")))
+ (add-after 'build 'install-udev-rules
+ (lambda _
+ (let ((rules (string-append #$output "/lib/udev/rules.d")))
+ (mkdir-p rules)
+ (call-with-output-file (string-append rules "/50-usbrelay.rules")
+ (lambda (port)
+ (display (string-append
+ "ATTRS{idVendor}==\"16c0\", ATTRS{idProduct}==\"05df\", "
+ "MODE=\"0660\", GROUP=\"usbrelay\"\n") port)))))))))
(native-inputs (list gcc guile-3.0 nyacc pkg-config))
(inputs (list hidapi))
(propagated-inputs (list nyacc))