summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xinfra/dgit-repos-server4
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]/) {