me/guix
Archived
1
0
Fork 0
Code Activity

gnu: python-pyusb: Use G-Expressions.

Browse source 
* gnu/packages/usb.scm (python-pyusb) <arguments>: Use G-Expressions
  style instead of quoting.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Jean-Pierre De Jesus DIAZ 2023-09-20 12:05:26 +02:00 • committed by Ludovic Courtès
parent ab8290c06a
commit c307a18415
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 17 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

35
gnu/packages/libusb.scm
View file

@ -288,24 +288,23 @@ wrapper for accessing libusb-1.0.")
"1fg7knfzybzija2b01pzrzhzsj989scl12sb2ra4f503l8279k54"))))
(build-system python-build-system)
(arguments
`(#:tests? #f ; no tests
#:modules ((srfi srfi-1)
(srfi srfi-26)
(guix build utils)
(guix build python-build-system))
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-libusb-reference
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "usb/libloader.py"
(("lib = locate_library\\(candidates, find_library\\)")
(string-append
"lib = \""
(find (negate symbolic-link?)
(find-files (assoc-ref inputs "libusb")
"^libusb-.*\\.so\\..*"))
"\"")))
#t)))))
(list #:tests? #f ; no tests
#:modules '((srfi srfi-1)
(srfi srfi-26)
(guix build utils)
(guix build python-build-system))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-libusb-reference
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "usb/libloader.py"
(("lib = locate_library\\(candidates, find_library\\)")
(string-append
"lib = \""
(find (negate symbolic-link?)
(find-files (assoc-ref inputs "libusb")
"^libusb-.*\\.so\\..*"))
"\""))))))))
(native-inputs
(list python-setuptools-scm))