01/01: gnu: hwloc: Propagate libpciaccess.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit c6e59259fd95d6fbfb567827aefbe5a53988a6dc
Author: Ludovic Courtès <address@hidden>
Date:   Mon Aug 24 00:28:36 2015 +0200

    gnu: hwloc: Propagate libpciaccess.
    
    * gnu/packages/mpi.scm (hwloc)[inputs]: Move LIBPCIACCESS to...
      [propagated-inputs]: ... here.  New field.
---
 gnu/packages/mpi.scm |    9 ++++++---
 1 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/mpi.scm b/gnu/packages/mpi.scm
index 9417e35..8dba82d 100644
--- a/gnu/packages/mpi.scm
+++ b/gnu/packages/mpi.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014, 2015 Eric Bavier <address@hidden>
-;;; Copyright © 2014 Ludovic Courtès <address@hidden>
+;;; Copyright © 2014, 2015 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2014 Ian Denhardt <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -57,8 +57,10 @@
        ("cairo" ,cairo)
        ("ncurses" ,ncurses)
        ("numactl" ,numactl)
-       ("libpciaccess" ,libpciaccess)
        ("expat" ,expat)))
+    (propagated-inputs
+     ;; hwloc.pc lists it in 'Requires.private'.
+     `(("libpciaccess" ,libpciaccess)))
     (native-inputs
      `(("pkg-config" ,pkg-config)))
     (arguments
@@ -72,7 +74,8 @@
                   (numa (assoc-ref inputs "numactl")))
               (substitute* (map (lambda (f) (string-append out "/" f))
                                 '("lib/pkgconfig/hwloc.pc" "lib/libhwloc.la"))
-                (("-lnuma" lib) (string-append "-L" numa "/lib " lib)))))))))
+                (("-lnuma" lib)
+                 (string-append "-L" numa "/lib " lib)))))))))
     (home-page "http://www.open-mpi.org/projects/hwloc/";)
     (synopsis "Abstraction of hardware architectures")
     (description