guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

18/66: gnu: git: Return #t from all phases.


From: Mark H. Weaver
Subject: 18/66: gnu: git: Return #t from all phases.
Date: Fri, 23 Mar 2018 04:46:42 -0400 (EDT)

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

commit ecb67a18b0acff90dfb275feefc407bbc947c23e
Author: Mark H Weaver <address@hidden>
Date:   Fri Mar 23 02:26:50 2018 -0400

    gnu: git: Return #t from all phases.
    
    * gnu/packages/version-control.scm (git)[arguments]: Return #t from
    the 'split' phase.  Use 'invoke' in the 'install-man-pages' phase.
---
 gnu/packages/version-control.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index 1ed6b30..36dbce4 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -346,7 +346,9 @@ as well as the classic centralized workflow.")
               (wrap-program git-sm
                 `("PATH" ":" prefix
                   (,(string-append (assoc-ref inputs "perl")
-                                   "/bin")))))))
+                                   "/bin"))))
+
+              #t)))
         (add-after 'split 'install-man-pages
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (let* ((out (assoc-ref outputs "out"))
@@ -354,7 +356,7 @@ as well as the classic centralized workflow.")
                    (manpages (assoc-ref inputs "git-manpages")))
               (mkdir-p man)
               (with-directory-excursion man
-                (zero? (system* "tar" "xvf" manpages)))))))))
+                (invoke "tar" "xvf" manpages))))))))
 
    (native-search-paths
     ;; For HTTPS access, Git needs a single-file certificate bundle, specified



reply via email to

[Prev in Thread] Current Thread [Next in Thread]