diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2015-03-17 21:55:00 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2015-03-22 15:18:53 +0000 |
commit | bd14b12dc5968943106f05f1a869afd290c2e2a5 (patch) | |
tree | 13054a925898d406bda54c2b81845036f99647fd | |
parent | d0c5d6629f42b2efa52fb48a5f24407ef18f86b2 (diff) |
dgit-repos-server: check suite a little later
-rwxr-xr-x | infra/dgit-repos-server | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/infra/dgit-repos-server b/infra/dgit-repos-server index 7c447d2..22e6ea7 100755 --- a/infra/dgit-repos-server +++ b/infra/dgit-repos-server @@ -475,7 +475,7 @@ sub tagh1 ($) { sub checks () { debug "checks"; - checksuite(); + tagh1('type') eq 'commit' or reject "tag refers to wrong kind of object"; tagh1('object') eq $commit or reject "tag refers to wrong commit"; tagh1('tag') eq $tagname or reject "tag name in tag is wrong"; @@ -486,6 +486,8 @@ sub checks () { debug "translated version $v"; $tagname eq "debian/$v" or die; + checksuite(); + # check that our ref is being fast-forwarded debug "oldcommit $oldcommit"; if ($oldcommit =~ m/[^0]/) { |