gnu: xdotool: Use 'modify-phases'.

* gnu/packages/xdisorg.scm (xdotool)[arguments]: Use 'modify-phases'.
This commit is contained in:
Efraim Flashner 2016-08-19 23:15:37 +03:00
parent a0cbf1b9bf
commit c237480b0c
No known key found for this signature in database
GPG Key ID: F4C1D3917EACEE93
1 changed files with 8 additions and 8 deletions

View File

@ -182,14 +182,14 @@ X11 (yet).")
(arguments
'(#:tests? #f ; Test suite requires a lot of black magic
#:phases
(alist-replace 'configure
(lambda* (#:key outputs #:allow-other-keys #:rest args)
(setenv "PREFIX" (assoc-ref outputs "out"))
(setenv "LDFLAGS" (string-append "-Wl,-rpath="
(assoc-ref
%outputs "out") "/lib"))
(setenv "CC" "gcc"))
%standard-phases)))
(modify-phases %standard-phases
(replace 'configure
(lambda* (#:key outputs #:allow-other-keys #:rest args)
(setenv "PREFIX" (assoc-ref outputs "out"))
(setenv "LDFLAGS"
(string-append "-Wl,-rpath="
(assoc-ref %outputs "out") "/lib"))
(setenv "CC" "gcc"))))))
(native-inputs `(("perl" ,perl))) ; for pod2man
(inputs `(("libx11" ,libx11)
("libxext" ,libxext)