me/guix
Archived
1
0
Fork 0
Code Activity

gnu: hss: Use G-expressions.

Browse source 
* gnu/packages/ssh.scm (hss)[arguments]:
Rewrite as G-expressions.
This commit is contained in:
Tobias Geerinckx-Rice 2022-05-22 02:00:01 +02:00
parent b8d5cbb767
commit b25e18407b
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 13 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
gnu/packages/ssh.scm
View file

@ -72,6 +72,7 @@
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix gexp)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix utils) #:use-module (guix utils)
@ -93,17 +94,17 @@
(inputs (inputs
(list readline)) (list readline))
(arguments (arguments
`(#:make-flags (list #:make-flags
(list ,(string-append "CC=" (cc-for-target)) #~(list (string-append "CC=" #$(cc-for-target))
(string-append "INSTALL_BIN=" (assoc-ref %outputs "out") "/bin")) (string-append "INSTALL_BIN=" #$output "/bin"))
#:tests? #f ; no tests #:tests? #f ; no tests
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'patch-file-names (add-after 'unpack 'patch-file-names
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda _
(substitute* "Makefile" (substitute* "Makefile"
(("/usr/local/opt/readline") (("/usr/local/opt/readline")
(assoc-ref inputs "readline"))))) #$(this-package-input "readline")))))
(delete 'configure)))) ; no configure script (delete 'configure)))) ; no configure script
(build-system gnu-build-system) (build-system gnu-build-system)
(home-page "https://github.com/six-ddc/hss/") (home-page "https://github.com/six-ddc/hss/")