From 1b85c83dc9e1bd3bd087da4e4301c4a5309bf5e0 Mon Sep 17 00:00:00 2001
From: Colin Watson <cjwatson@debian.org>
Date: Tue, 13 Mar 2012 17:09:00 +0000
Subject: Stop at the end of the retrieval phase if any packages failed to
 download.

---
 debian/changelog | 2 ++
 functions        | 1 +
 2 files changed, 3 insertions(+)

diff --git a/debian/changelog b/debian/changelog
index 92a77c0..cda3ed8 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -3,6 +3,8 @@ debootstrap (1.0.39) UNRELEASED; urgency=low
   * Retry corrupted downloads rather than carrying on almost regardless.
     Patch mostly due to Michael Gilbert, rearranged somewhat by me (closes:
     #618920).
+  * Stop at the end of the retrieval phase if any packages failed to
+    download.
 
  -- Colin Watson <cjwatson@debian.org>  Tue, 13 Mar 2012 17:03:03 +0000
 
diff --git a/functions b/functions
index a8fdce4..edc6332 100644
--- a/functions
+++ b/functions
@@ -630,6 +630,7 @@ download_debs () {
 					echo >>$TARGET/debootstrap/debpaths "$p $debdest"
 				else
 					warning COULDNTDL "Couldn't download package %s (ver %s arc %s)" "$p" "$ver" "$arc"
+					leftover="$leftover $p"
 				fi
 			fi
 		done
-- 
cgit v0.12