04/04: gnu: guix: Add dependency on Guile-Git.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 9ca8aa38ecce0b0651a0ff394ee4ce32bdd0bb41
Author: Ludovic Courtès <address@hidden>
Date:   Fri Jul 28 17:52:21 2017 +0200

    gnu: guix: Add dependency on Guile-Git.
    
    * gnu/packages/package-management.scm (guix)[arguments] <wrap-program>:
    Add Guile-Git to PATH.
    [propagated-inputs]: Add GUILE-GIT.
    (guile2.0-guix)[propagated-inputs]: Add GUILE2.0-GIT.
---
 gnu/packages/package-management.scm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/package-management.scm 
b/gnu/packages/package-management.scm
index d49b4c3..3650b5d 100644
--- a/gnu/packages/package-management.scm
+++ b/gnu/packages/package-management.scm
@@ -187,6 +187,7 @@
                         (let* ((out    (assoc-ref outputs "out"))
                                (guile  (assoc-ref inputs "guile"))
                                (json   (assoc-ref inputs "guile-json"))
+                               (git    (assoc-ref inputs "guile-git"))
                                (ssh    (assoc-ref inputs "guile-ssh"))
                                (gnutls (assoc-ref inputs "gnutls"))
                                (effective
@@ -196,6 +197,7 @@
                                              "-c" "(display 
(effective-version))")))
                                (path   (string-append
                                         json "/share/guile/site/" effective ":"
+                                        git "/share/guile/site/" effective ":"
                                         ssh "/share/guile/site/" effective ":"
                                         gnutls "/share/guile/site/" 
effective)))
 
@@ -252,7 +254,8 @@
       (propagated-inputs
        `(("gnutls" ,gnutls/guile-2.2)             ;for 'guix download' & co.
          ("guile-json" ,guile-json)
-         ("guile-ssh" ,guile-ssh)))
+         ("guile-ssh" ,guile-ssh)
+         ("guile-git" ,guile-git)))
 
       (home-page "https://www.gnu.org/software/guix/";)
       (synopsis "Functional package manager for installed software packages 
and versions")
@@ -278,7 +281,8 @@ the Nix package manager.")
     (propagated-inputs
      `(("gnutls" ,gnutls)
        ("guile-json" ,guile2.0-json)
-       ("guile-ssh" ,guile2.0-ssh)))))
+       ("guile-ssh" ,guile2.0-ssh)
+       ("guile-git" ,guile2.0-git)))))
 
 (define (source-file? file stat)
   "Return true if FILE is likely a source file, false if it is a typical