diff options
Diffstat (limited to 'dgit-repos-server')
-rwxr-xr-x | dgit-repos-server | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/dgit-repos-server b/dgit-repos-server index add5424..49fa795 100755 --- a/dgit-repos-server +++ b/dgit-repos-server @@ -464,9 +464,9 @@ sub tagh1 ($) { sub checks () { debug "checks"; checksuite(); - tagh1('type') eq 'commit' or die; - tagh1('object') eq $commit or die; - tagh1('tag') eq $tagname or die; + 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"; my $v = $version; $v =~ y/~:/_%/; |