08/08: guix build: Gracefully handle invalid '--with-git-url' specs.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 45d41c035ec23d68f67b69255a5ab8f02b42a5ed
Author: Ludovic Courtès <l...@gnu.org>
Date:   Tue May 14 12:08:03 2019 +0200

    guix build: Gracefully handle invalid '--with-git-url' specs.
    
    * guix/scripts/build.scm (transform-package-source-git-url): Add case
    for when 'string-split' does not return exactly two elements.
---
 guix/scripts/build.scm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/guix/scripts/build.scm b/guix/scripts/build.scm
index 8d5411e..8fa700c 100644
--- a/guix/scripts/build.scm
+++ b/guix/scripts/build.scm
@@ -370,7 +370,10 @@ a checkout of the Git repository at the given URL."
                       (package
                         (inherit old)
                         (source (git-checkout (url url)
-                                              (recursive? #t)))))))))
+                                              (recursive? #t)))))))
+             (_
+              (leave (G_ "~a: invalid Git URL replacement specification~%")
+                     spec))))
          replacement-specs))
 
   (define rewrite