[PATCH] git-download: Fix recursive checkouts.

  • Done
  • quality assurance status badge
Details
2 participants
  • Eric Bavier
  • Ludovic Courtès
Owner
unassigned
Submitted by
Eric Bavier
Severity
normal
E
E
Eric Bavier wrote on 16 Mar 2018 05:28
(address . guix-patches@gnu.org)
20180315232807.4f06bcb3@centurylink.net
Hello Guix,

The attached patch fixes a regression in recursive git checkouts of
package source, which I believe was introduced in
6dff905e51202bbdebbad8811b6509584d12a796 (2017-09-05!)

This would have only affected 6 packages:

scheme@(guile-user)> (format #t "~{~a~%~}"
(fold-packages
(lambda (p r)
(if (and=> (package-source p)
(lambda (s)
(and (git-reference? (origin-uri s))
(git-reference-recursive? (origin-uri s)))))
(cons p r)
r))
'())
#<package brotli@0.1-1.e992cce gnu/packages/compression.scm:912 2928000>
#<package aseba@1.6.0-0.3b35de8 gnu/packages/robotics.scm:79 3199e40>
#<package cool-retro-term@1.0.1-1.dd799cf gnu/packages/terminals.scm:446 2e28b40>
#<package termite@13 gnu/packages/terminals.scm:102 2e25240>
#<package wget2@1.0.0 gnu/packages/wget.scm:126 2728900>
#<package zile-on-guile@2.4.14-0.fd09781 gnu/packages/zile.scm:83 3c660c0>
$8 = #t

`~Eric
From 7798ecb3e61b042e4af3c0501f32d6b8888c1a13 Mon Sep 17 00:00:00 2001
From: Eric Bavier <bavier@member.fsf.org>
Date: Thu, 15 Mar 2018 23:25:01 -0500
Subject: [PATCH] git-download: Fix recursive checkouts.

* guix/git-download.scm (git-fetch)<build>: Fix match on INPUTS, which may
contain package outputs.
---
guix/git-download.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)

Toggle diff (15 lines)
diff --git a/guix/git-download.scm b/guix/git-download.scm
index 731e549b3..33f102bc6 100644
--- a/guix/git-download.scm
+++ b/guix/git-download.scm
@@ -109,7 +109,7 @@ HASH-ALGO (a symbol). Use NAME as the file name, or a generic name if #f."
;; grep, etc. to be in $PATH.
(set-path-environment-variable "PATH" '("bin")
(match '#+inputs
- (((names dirs) ...)
+ (((names dirs outputs ...) ...)
dirs)))
(or (git-fetch (getenv "git url") (getenv "git commit")
--
2.16.2
-----BEGIN PGP SIGNATURE-----

iQIzBAEBCgAdFiEEoMXjUi7471xkzbfw/XPKxxnTJWYFAlqrR9cACgkQ/XPKxxnT
JWaZ2w//XQ2CFpF4W8bGD+py/DeZ5sS1IAG491Ch9NeBqWCENRbwp3vEVZO9E+lE
dEkptrQDspdy3mC3o7kP/Ins/haatgaMFRrMdj7O2F6MN6ZntXUkPiGtf3Eu5OON
0lN2EQoAXN87Pyom3ApqCipfqvZkhWj7DE2Bp5pnBtf2TKLV+4BazSJlx+zgDGA9
fyPwd9CV2tmsDeEfRN0+I79uKhxsdA5hNvzNNDAd9uzZFJsEXKFU48dQ7qXn8zhF
uqoqRE1voeqAxjtuKaaNrBf0o+CMJyCaWRL0dSK4ZMzZEi7cH6OGs6i45CoNgVo+
IR6WEAZW02ItUigXg5mfQol4iGByH5xCOyMHUJCwNtNNMOsiNb0Is1NWHPtMODP6
v1H9H8MGtY48fXD5L8A+yG2bQqyMSUgqa5abR7kitru719dLvJRaDqoN1iEWde9M
k7MS2LXlCSesBsI+BqC4XOzlKbuBGY24c2B/gisFSPeK98Sm6T9A07ji2jBQcGY7
QQ41VuzZOkFRYHQJt++IdJ9016uSZ88PW5t0r4aNToTFys2H6jv70nmoGvw8yX3w
1BXiQIzZjFG48BfRPWgwmz4qR4olxkFJzx5jvelY8b7MfA9hdgdGSzyViUvyrKGC
et6S0ZDFNMYoEK1BncTD5+jGF+vT6oBh7MRl3tTwoTRCTdwh0CA=
=xe/t
-----END PGP SIGNATURE-----


L
L
Ludovic Courtès wrote on 17 Mar 2018 22:24
(name . Eric Bavier)(address . ericbavier@centurylink.net)(address . 30833@debbugs.gnu.org)
877eqamm3g.fsf@gnu.org
Hi Eric,

Eric Bavier <ericbavier@centurylink.net> skribis:

Toggle quote (4 lines)
> The attached patch fixes a regression in recursive git checkouts of
> package source, which I believe was introduced in
> 6dff905e51202bbdebbad8811b6509584d12a796 (2017-09-05!)

Indeed, good catch!

Toggle quote (8 lines)
> From 7798ecb3e61b042e4af3c0501f32d6b8888c1a13 Mon Sep 17 00:00:00 2001
> From: Eric Bavier <bavier@member.fsf.org>
> Date: Thu, 15 Mar 2018 23:25:01 -0500
> Subject: [PATCH] git-download: Fix recursive checkouts.
>
> * guix/git-download.scm (git-fetch)<build>: Fix match on INPUTS, which may
> contain package outputs.

LGTM, thank you!

Ludo’.
L
L
Ludovic Courtès wrote on 22 Mar 2018 12:37
control message for bug #30833
(address . control@debbugs.gnu.org)
87k1u4ibo7.fsf@gnu.org
tags 30833 fixed
close 30833
?
Your comment

This issue is archived.

To comment on this conversation send an email to 30833@debbugs.gnu.org

To respond to this issue using the mumi CLI, first switch to it
mumi current 30833
Then, you may apply the latest patchset in this issue (with sign off)
mumi am -- -s
Or, compose a reply to this issue
mumi compose
Or, send patches to this issue
mumi send-email *.patch