~ruther/guix-local: gnu: b4: Ensure git presence.

e3e64acdb8ea8a9b55e376595b0fb1018e170376 — Nicolas Graves via Guix-patches via 2 years ago f861793

gnu: b4: Ensure git presence.

* gnu/packages/version-control.scm (b4): Ensure git presence.
[arguments]<#:phases>: Add phase hardcode-git-bin.
[inputs]: Add git-minimal.

Change-Id: Ib2dca06009cdacc0e5ab4ab227cd30991474404c
Signed-off-by: Hilton Chain <hako@ultrarare.space>

patch browse .tar.gz .zip

1 files changed, 9 insertions(+), 2 deletions(-)

M gnu/packages/version-control.scm

M gnu/packages/version-control.scm => gnu/packages/version-control.scm +9 -2

@@ 2927,9 2927,16 @@ email header.")
                ;; XXX: dnspython attempts to read /etc/resolv.conf when loading
                ;; resolver.py, which breaks the sanity check in dependent
                ;; packages.  This should rather be fixed in dnspython.
-               (delete 'sanity-check))))
+               (delete 'sanity-check)
+               ;; This ensures git is present when called.
+               (add-after 'unpack 'hardcode-git-bin
+                 (lambda* (#:key inputs #:allow-other-keys)
+                   (substitute* (find-files "b4" "\\.py$")
+                     (("\\['git'")
+                      (string-append
+                       "['" (search-input-file inputs "bin/git") "'"))))))))
     (inputs
-     (list python-dkimpy python-dnspython python-requests))
+     (list git-minimal python-dkimpy python-dnspython python-requests))
     (propagated-inputs
      (list patatt))
     (home-page "https://git.kernel.org/pub/scm/utils/b4/b4.git")