From 4b4f00a653167584f83051e2cee73724b6fd1a3b Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 26 Jan 2014 19:13:28 +0000
Subject: [PATCH] dgit-repos-server: better handling of wrongness in
 maybeinstallprospective

---
 dgit-repos-server | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/dgit-repos-server b/dgit-repos-server
index ce48eeb2..8dd36aee 100755
--- a/dgit-repos-server
+++ b/dgit-repos-server
@@ -241,9 +241,11 @@ sub maybeinstallprospective () {
 	    die;
 	die if $got{$wh}++;
     }
+    $!=0; $?=0; close SR or $?==256 or die "$? $!";
+
     debug "installprospective ?";
-    die if grep { !$_ } values %got;
-    $!=0; $?=0; close SR or die "$? $!";
+    die Dumper(\%got)." -- missing refs in new repo"
+	if grep { !$_ } values %got;
 
     debug "install $destrepo => $realdestrepo";
     rename $destrepo, $realdestrepo or die $!;
-- 
2.30.2