From 355bae94512391434bb6c7e14e8632451654380b Mon Sep 17 00:00:00 2001 From: Federico Beffa Date: Tue, 13 Jan 2015 16:25:29 +0100 Subject: [PATCH] gnu: eudev: Add pre-build phase. * gnu/packages/linux.scm (eudev): Add 'pre-build phase to fix compilation with 'gobject-introspection' 1.42.0. --- gnu/packages/linux.scm | 18 +++++++++++++++--- 1 file changed, 15 insertions(+), 3 deletions(-) diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 4599323..ad4e52c 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -1407,9 +1407,21 @@ time.") (("linux/btrfs\\.h") ""))))) (arguments - (substitute-keyword-arguments (package-arguments udev) - ((#:configure-flags flags) - `(cons "--enable-libkmod" ,flags)))) + `(,@(substitute-keyword-arguments (package-arguments udev) + ((#:configure-flags flags) + `(cons "--enable-libkmod" ,flags))) + #:phases + (alist-cons-before + 'build 'pre-build + ;; The program 'g-ir-scanner' (part of the package + ;; 'gobject-introspection'), to generate .gir files, makes some + ;; library pre-processing. During that phase it looks for the C + ;; compiler as either 'cc' or as defined by the environment variable + ;; 'CC' (with code in 'giscanner/dumper.py'). + (lambda* (#:key inputs #:allow-other-keys) + (let ((gcc (string-append (assoc-ref inputs "gcc") "/bin/gcc"))) + (setenv "CC" gcc))) + %standard-phases))) (home-page "http://www.gentoo.org/proj/en/eudev/"))) (define-public lvm2 -- 1.8.4