TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: links: Use 'modify-phases'.

Browse source 
* gnu/packages/links.scm (links)[arguments]: Use 'modify-phases'.
This commit is contained in:
Efraim Flashner 2016-09-14 22:04:50 +03:00
parent 7ddacf88ef
commit 6ea541e016
No known key found for this signature in database
GPG key ID: F4C1D3917EACEE93
1 changed files with 17 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gnu/packages/links.scm
View file

@ -42,8 +42,9 @@ (define-public links
(base32 "01a4mbpvf7450ymqarjkpmzrm0z2zyd9lvqwg7x9kcd36i9hjln2")))) (base32 "01a4mbpvf7450ymqarjkpmzrm0z2zyd9lvqwg7x9kcd36i9hjln2"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases (alist-replace `(#:phases
'configure (modify-phases %standard-phases
(replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
;; The tarball uses a very old version of autconf. It doesn't ;; The tarball uses a very old version of autconf. It doesn't
;; understand extra flags like `--enable-fast-install', so ;; understand extra flags like `--enable-fast-install', so
@ -57,8 +58,7 @@ (define-public links
(zero? (zero?
(system* "./configure" (system* "./configure"
(string-append "--prefix=" out) (string-append "--prefix=" out)
"--enable-graphics")))) "--enable-graphics"))))))))
%standard-phases)))
(native-inputs `(("pkg-config" ,pkg-config))) (native-inputs `(("pkg-config" ,pkg-config)))
(inputs `(("zlib" ,zlib) (inputs `(("zlib" ,zlib)
("openssl" ,openssl) ("openssl" ,openssl)