diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2014-01-26 19:13:28 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2014-03-05 18:29:05 +0000 |
commit | 4b4f00a653167584f83051e2cee73724b6fd1a3b (patch) | |
tree | 3827ec6ae3e3b41c48c64cc28df67d1b4dbcb38c /dgit-repos-server | |
parent | b58de5245d0a98e91a5f708d93c2eb6b4a198b47 (diff) |
dgit-repos-server: better handling of wrongness in maybeinstallprospective
Diffstat (limited to 'dgit-repos-server')
-rwxr-xr-x | dgit-repos-server | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/dgit-repos-server b/dgit-repos-server index ce48eeb..8dd36ae 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 $!; |