01/01: gnu: Adjust packages to new handling of propagated inputs.

[Ludovic Courtès]

civodul pushed a commit to branch core-updates
in repository guix.

commit c6d33a9d9c7a9ec3f5d7b1afb6d836dae3c8706e
Author: Ludovic Courtès <address@hidden>
Date:   Tue Jul 14 16:15:30 2015 +0200

    gnu: Adjust packages to new handling of propagated inputs.
    
    This is a followup to 161094c, which gets rid of the "a/b" notation for
    propagated inputs.
    
    * gnu/packages/cross-base.scm (cross-gcc-arguments): Change reference from
      "libc/linux-headers" to "linux-headers".
    * gnu/packages/emacs.scm (magit-svn): Change "magit/git-modes" to
      "git-modes".
---
 gnu/packages/cross-base.scm |    5 ++---
 gnu/packages/emacs.scm      |    3 +--
 2 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/cross-base.scm b/gnu/packages/cross-base.scm
index b5e07b8..712aa9d 100644
--- a/gnu/packages/cross-base.scm
+++ b/gnu/packages/cross-base.scm
@@ -165,8 +165,7 @@ may be either a libc package or #f.)"
                   ;; Add the cross Linux headers to CROSS_CPATH, and remove 
them
                   ;; from CPATH.
                   (let ((libc  (assoc-ref inputs "libc"))
-                        (linux (assoc-ref inputs
-                                          "libc/linux-headers")))
+                        (linux (assoc-ref inputs "linux-headers")))
                     (define (cross? x)
                       ;; Return #t if X is a cross-libc or cross Linux.
                       (or (string-prefix? libc x)
@@ -314,7 +313,7 @@ XBINUTILS and the cross tool chain."
               #t))
           ,phases))))
 
-    ;; Shadow the native "linux-headers" because glibc's recipe expect the
+    ;; Shadow the native "linux-headers" because glibc's recipe expects the
     ;; "linux-headers" input to point to the right thing.
     (propagated-inputs `(("linux-headers" ,xlinux-headers)))
 
diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
index f00e15c..84e167d 100644
--- a/gnu/packages/emacs.scm
+++ b/gnu/packages/emacs.scm
@@ -408,8 +408,7 @@ operations.")
                                          "/bin/emacs"))
                 (magit    (string-append (assoc-ref %build-inputs "magit")
                                          "/share/emacs/site-lisp"))
-                (commit   (string-append (assoc-ref %build-inputs
-                                                    "magit/git-modes")
+                (commit   (string-append (assoc-ref %build-inputs "git-modes")
                                          "/share/emacs/site-lisp"))
                 (source   (assoc-ref %build-inputs "source"))
                 (lisp-dir (string-append %output "/share/emacs/site-lisp")))