From c237480b0cb912ca95d2b8e757a6a2e15ef6f3c1 Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Fri, 19 Aug 2016 23:15:37 +0300 Subject: gnu: xdotool: Use 'modify-phases'. * gnu/packages/xdisorg.scm (xdotool)[arguments]: Use 'modify-phases'. --- gnu/packages/xdisorg.scm | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm index 659bce098d..68d4dff404 100644 --- a/gnu/packages/xdisorg.scm +++ b/gnu/packages/xdisorg.scm @@ -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) -- cgit v1.2.3