ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-13 06:36:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: jetring: Update to 0.31.

Browse source 
* gnu/packages/gnupg.scm (jetring): Update to 0.31.
[arguments]: Don't explicitly return #t from phases.
This commit is contained in:
Tobias Geerinckx-Rice 2022-10-30 02:00:01 +01:00
parent a350ee803c
commit bb453af580
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 5 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/packages/gnupg.scm
View file

@ -1167,7 +1167,7 @@ (define-public parcimonie
(define-public jetring
(package
(name "jetring")
(version "0.30")
(version "0.31")
(source
(origin
(method git-fetch)
@ -1181,14 +1181,13 @@ (define-public jetring
(arguments
'(#:phases
(modify-phases %standard-phases
(delete 'configure) ; no configure script
(delete 'configure) ; no configure script
(add-before 'install 'hardlink-gnupg
(lambda* (#:key inputs #:allow-other-keys)
(let ((gpg (search-input-file inputs "/bin/gpg")))
(substitute* (find-files "." "jetring-[[:alpha:]]+$")
(("gpg -") (string-append gpg " -"))
(("\\\"gpg\\\"") (string-append "\"" gpg "\"")))
#t)))
(("\\\"gpg\\\"") (string-append "\"" gpg "\""))))))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
@ -1199,9 +1198,8 @@ (define-public jetring
(for-each (lambda (file)
(install-file file (string-append man "/man1/")))
(find-files "." ".*\\.1$"))
(install-file "jetring.7" (string-append man "/man7/"))
#t))))
#:tests? #f)) ; no test phase
(install-file "jetring.7" (string-append man "/man7/"))))))
#:tests? #f)) ; no tests
(inputs
(list gnupg perl))
(home-page "https://joeyh.name/code/jetring/")