gnu: corkscrew: Clean up dead code.
* gnu/packages/ssh.scm (corkscrew)[arguments]: Remove unnecessary variables and procedure calls.
This commit is contained in:
parent
d26563323d
commit
5b34f56c1d
|
@ -329,25 +329,21 @@ libssh library.")
|
|||
"1gmhas4va6gd70i2x2mpxpwpgww6413mji29mg282jms3jscn3qd"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
;; Replace configure phase as the ./configure script does not link
|
||||
;; CONFIG_SHELL and SHELL passed as parameters
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(replace 'configure
|
||||
(lambda* (#:key outputs inputs system build target
|
||||
#:allow-other-keys #:rest args)
|
||||
(let* ((configure (assoc-ref %standard-phases 'configure))
|
||||
(prefix (assoc-ref outputs "out"))
|
||||
;; Replace configure phase as the ./configure script does not like
|
||||
;; CONFIG_SHELL and SHELL passed as parameters
|
||||
(lambda* (#:key outputs build target #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(bash (which "bash"))
|
||||
;; Set --build and --host flags as the provided config.guess
|
||||
;; is not able to detect them
|
||||
(flags `(,(string-append "--prefix=" prefix)
|
||||
(flags `(,(string-append "--prefix=" out)
|
||||
,(string-append "--build=" build)
|
||||
,(string-append "--host=" (or target build)))))
|
||||
(setenv "CONFIG_SHELL" bash)
|
||||
(apply invoke bash
|
||||
(string-append "." "/configure")
|
||||
flags))))
|
||||
(apply invoke bash "./configure" flags))))
|
||||
(add-after 'install 'install-documentation
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
|
|
Loading…
Reference in New Issue