gnu: mosh: Update package style.
* gnu/packages/ssh.scm (mosh)[arguments]: Use G-expressions. Don't explicitly return #t from phases. [inputs]: Remove input labels.
parent
62d42bdd75
commit
063655dbad
|
@ -473,32 +473,30 @@ with optional @acronym{TLS, Transport-Level Security} to protect credentials.")
|
||||||
"1pax8sqlvcc7ammsxd9r53yx4m2hg1827wfz6f4rrwjx9q9lnbl7"))))
|
"1pax8sqlvcc7ammsxd9r53yx4m2hg1827wfz6f4rrwjx9q9lnbl7"))))
|
||||||
(build-system gnu-build-system)
|
(build-system gnu-build-system)
|
||||||
(arguments
|
(arguments
|
||||||
'(#:phases
|
(list
|
||||||
(modify-phases %standard-phases
|
#:phases
|
||||||
(add-after 'unpack 'patch-FHS-file-names
|
#~(modify-phases %standard-phases
|
||||||
(lambda _
|
(add-after 'unpack 'patch-FHS-file-names
|
||||||
(substitute* "scripts/mosh.pl"
|
(lambda _
|
||||||
(("/bin/sh")
|
(substitute* "scripts/mosh.pl"
|
||||||
(which "sh")))
|
(("/bin/sh")
|
||||||
#t))
|
(which "sh")))))
|
||||||
(add-after 'install 'wrap
|
(add-after 'install 'wrap
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda _
|
||||||
;; Make sure 'mosh' can find 'mosh-client' and
|
;; Make sure 'mosh' can find 'mosh-client' and 'mosh-server'.
|
||||||
;; 'mosh-server'.
|
(let ((bin (string-append #$output "/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")
|
|
||||||
`("PATH" ":" prefix (,bin)))))))))
|
|
||||||
(native-inputs
|
(native-inputs
|
||||||
(list pkg-config))
|
(list pkg-config))
|
||||||
(inputs
|
(inputs
|
||||||
`(("openssl" ,openssl)
|
(list boost
|
||||||
("perl" ,perl)
|
ncurses
|
||||||
("perl-io-tty" ,perl-io-tty)
|
openssl
|
||||||
("zlib" ,zlib)
|
perl
|
||||||
("ncurses" ,ncurses)
|
perl-io-tty
|
||||||
("protobuf" ,protobuf)
|
protobuf
|
||||||
("boost-headers" ,boost)))
|
zlib))
|
||||||
(home-page "https://mosh.org/")
|
(home-page "https://mosh.org/")
|
||||||
(synopsis "Remote shell tolerant to intermittent connectivity")
|
(synopsis "Remote shell tolerant to intermittent connectivity")
|
||||||
(description
|
(description
|
||||||
|
|
Reference in New Issue