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

gnu: lsh: Move generic patching to 'snippet'. 

* gnu/packages/lsh.scm (lsh): Move generic patching to the 'snippet'
  field of 'origin'.
This commit is contained in:
Ludovic Courtès 2014-01-05 23:46:45 +01:00
parent 590e4154b6
commit b846126052
1 changed files with 27 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
gnu/packages/lsh.scm
View File

@ -61,14 +61,32 @@ basis for almost any application.")
(package (package
(name "lsh") (name "lsh")
(version "2.1") (version "2.1")
(source (source (origin
(origin (method url-fetch)
(method url-fetch) (uri (string-append "mirror://gnu/lsh/lsh-"
(uri (string-append "mirror://gnu/lsh/lsh-" version ".tar.gz"))
version ".tar.gz")) (sha256
(sha256 (base32
(base32 "1qqjy9zfzgny0rkb27c8c7dfsylvb6n0ld8h3an2r83pmaqr9gwb"))
"1qqjy9zfzgny0rkb27c8c7dfsylvb6n0ld8h3an2r83pmaqr9gwb")))) (modules '((guix build utils)))
(snippet
'(begin
(use-modules (guix build utils))
(substitute* "src/testsuite/functions.sh"
(("localhost")
;; Avoid host name lookups since they don't work in
;; chroot builds.
"127.0.0.1")
(("set -e")
;; Make tests more verbose.
"set -e\nset -x"))
(substitute* (find-files "src/testsuite" "-test$")
(("localhost") "127.0.0.1"))
(substitute* "src/testsuite/login-auth-test"
(("/bin/cat") "cat"))))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
`(("m4" ,m4) `(("m4" ,m4)
@ -107,24 +125,7 @@ basis for almost any application.")
sexp-conv "\"\n")))) sexp-conv "\"\n"))))
;; Tests rely on $USER being set. ;; Tests rely on $USER being set.
(setenv "USER" "guix") (setenv "USER" "guix"))
(substitute* "src/testsuite/functions.sh"
(("localhost")
;; Avoid host name lookups since they don't work in chroot
;; builds.
"127.0.0.1")
(("set -e")
;; Make tests more verbose.
"set -e\nset -x"))
(substitute* (find-files "src/testsuite" "-test$")
(("localhost") "127.0.0.1"))
(substitute* "src/testsuite/login-auth-test"
(("/bin/cat")
;; Use the right path to `cat'.
(which "cat"))))
%standard-phases))) %standard-phases)))
(home-page "http://www.lysator.liu.se/~nisse/lsh/") (home-page "http://www.lysator.liu.se/~nisse/lsh/")
(synopsis "GNU implementation of the Secure Shell (ssh) protocols") (synopsis "GNU implementation of the Secure Shell (ssh) protocols")