gnu: mosh: Use 'modify-phases'.
* gnu/packages/ssh.scm (mosh)[arguments]: Use 'modify-phases'.
This commit is contained in:
parent
c3671282c1
commit
11379192fa
@ -313,16 +313,16 @@ (define-public mosh
|
||||
"1qsb0y882yfgwnpy6f98pi5xqm6kykdsrxzvaal37hs7szjhky0s"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
'(#:phases (alist-cons-after
|
||||
'install 'wrap
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; Make sure 'mosh' can find 'mosh-client' and
|
||||
;; 'mosh-server'.
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(bin (string-append out "/bin")))
|
||||
(wrap-program (string-append bin "/mosh")
|
||||
`("PATH" ":" prefix (,bin)))))
|
||||
%standard-phases)))
|
||||
'(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'install 'wrap
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; Make sure 'mosh' can find 'mosh-client' and
|
||||
;; 'mosh-server'.
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(bin (string-append out "/bin")))
|
||||
(wrap-program (string-append bin "/mosh")
|
||||
`("PATH" ":" prefix (,bin)))))))))
|
||||
(native-inputs
|
||||
`(("pkg-config" ,pkg-config)))
|
||||
(inputs
|
||||
|
Loading…
Reference in New Issue
Block a user