bartronx7/guix
1
0
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2026-01-25 12:05:19 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: hg-commitsigs: Switch to pyproject.

Browse source 
* gnu/packages/version-control.scm (hg-commitsigs):
[arguments]<#:imported-modules, #:modules>: Switch to
pyproject-build-system, remove unneeded modules.
<#:phases>: Simplify phase 'patch-paths.
<#:install-plan>: Relocate field, use gexps.

Change-Id: I4c7c264203ad56acd609620284e1fd2595822235
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
This commit is contained in:
Nicolas Graves 2026-01-06 20:24:43 +01:00 • committed by Andreas Enge
parent 3256a25f8d
commit 630a74eda2
No known key found for this signature in database
GPG key ID: F7D5C9BF765C61E3
1 changed files with 19 additions and 27 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
gnu/packages/version-control.scm
View file

@ -2874,34 +2874,26 @@ history. It implements the changeset evolution concept for Mercurial.")
"059gm66q06m6ayl4brsc517zkw3ahmz249b6xm1m32ac5y24wb9x"))))
(build-system copy-build-system)
(arguments
`(#:imported-modules ((guix build python-build-system)
,@%copy-build-system-modules)
#:modules ((srfi srfi-1)
(guix build python-build-system)
;; Don't use `%copy-build-system-modules' because
;; `standard-phases' from (guix build gnu-build-system)
;; shadows the one from (guix build copy-build-system),
;; which is the one we actually want.
(list
#:imported-modules (append %pyproject-build-system-modules
%copy-build-system-modules)
#:modules `((guix build pyproject-build-system)
(guix build copy-build-system)
((guix build gnu-build-system) #:prefix gnu)
(guix build utils)
(guix build gremlin)
(ice-9 ftw)
(guix elf))
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-paths
(lambda* (#:key inputs #:allow-other-keys)
(let ((gpg (search-input-file inputs "/bin/gpg"))
(openssl (search-input-file inputs "/bin/openssl")))
(substitute* "commitsigs.py"
(("b'gpg',") (string-append "b'" gpg "',"))
(("b'openssl',") (string-append "b'" openssl "',")))))))
#:install-plan
`(("commitsigs.py" ,(string-append "lib/python"
(python-version
(assoc-ref %build-inputs "python"))
"/site-packages/hgext3rd/commitsigs.py")))))
(guix build utils))
#:install-plan
#~`(("commitsigs.py"
,(string-append "lib/python"
(python-version
#$(this-package-native-input "python"))
"/site-packages/hgext3rd/commitsigs.py")))
#:phases
(with-extensions (list (pyproject-guile-json))
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-paths
(lambda _
(substitute* "commitsigs.py"
(("b'(gpg|openssl)'," _ bin)
(format #f "b'~a'," (which bin))))))))))
(native-inputs
(list python))
(inputs