guix-commits
[Top][All Lists]
Advanced

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

06/11: gnu: git-sizer: Pin git version.


From: guix-commits
Subject: 06/11: gnu: git-sizer: Pin git version.
Date: Thu, 26 Dec 2024 17:31:37 -0500 (EST)

civodul pushed a commit to branch master
in repository guix.

commit 6642b8021feaf0d52866984f8430009ca7a03e97
Author: Greg Hogan <code@greghogan.com>
AuthorDate: Mon Dec 9 15:30:52 2024 +0000

    gnu: git-sizer: Pin git version.
    
    * gnu/packages/version-control.scm (git-sizer)
    [arguments]<#:phases>: Hard-code git path in 'fix-paths.
    [native-inputs]: Remove git.
    [inputs]: Add git-minimal/pinned.
    
    Change-Id: If6178a0e1c453ea47a1f70cd507639b5be2142b0
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/packages/version-control.scm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index be2789d9d4..e63a843fc3 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -4464,7 +4464,12 @@ comes as a command line app and also an Emacs 
interface.")
        #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'fix-paths
-           (lambda* (#:key outputs #:allow-other-keys)
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (substitute* '("src/github.com/github/git-sizer/git/git.go")
+               (("gitBin, err := findGitBin\\(\\)")
+                (string-append "gitBin := \""
+                               (search-input-file inputs "bin/git")
+                               "\"\n\tvar err error")))
              (substitute* 
'("src/github.com/github/git-sizer/git_sizer_test.go")
                (("bin/git-sizer")
                 (string-append (assoc-ref outputs "out")
@@ -4478,7 +4483,7 @@ comes as a command line app and also an Emacs interface.")
                          ;; Git repository.
                          '("TestBomb" "TestFromSubdir" "TestRefgroups"
                            "TestRefSelections" "TestTaggedTags"))))))))
-    (native-inputs (list git))
+    (inputs (list git-minimal/pinned))
     (propagated-inputs
      (list go-github-com-cli-safeexec
            go-github-com-davecgh-go-spew



reply via email to

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