nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: mosh: Use 'modify-phases'. 

* gnu/packages/ssh.scm (mosh)[arguments]: Use 'modify-phases'.
master
Efraim Flashner 2016-08-11 12:09:12 +03:00
parent c3671282c1
commit 11379192fa
No known key found for this signature in database
GPG Key ID: F4C1D3917EACEE93
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
gnu/packages/ssh.scm
View File

@ -313,16 +313,16 @@ in future and NTLM based authentication is most likey never be supported.")
"1qsb0y882yfgwnpy6f98pi5xqm6kykdsrxzvaal37hs7szjhky0s")))) "1qsb0y882yfgwnpy6f98pi5xqm6kykdsrxzvaal37hs7szjhky0s"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:phases (alist-cons-after '(#:phases
'install 'wrap (modify-phases %standard-phases
(lambda* (#:key outputs #:allow-other-keys) (add-after 'install 'wrap
;; Make sure 'mosh' can find 'mosh-client' and (lambda* (#:key outputs #:allow-other-keys)
;; 'mosh-server'. ;; Make sure 'mosh' can find 'mosh-client' and
(let* ((out (assoc-ref outputs "out")) ;; 'mosh-server'.
(bin (string-append out "/bin"))) (let* ((out (assoc-ref outputs "out"))
(wrap-program (string-append bin "/mosh") (bin (string-append out "/bin")))
`("PATH" ":" prefix (,bin))))) (wrap-program (string-append bin "/mosh")
%standard-phases))) `("PATH" ":" prefix (,bin)))))))))
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config))) `(("pkg-config" ,pkg-config)))
(inputs (inputs