chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d0c5d66
)
dgit-repos-server: check suite a little later
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Tue, 17 Mar 2015 21:55:00 +0000
(21:55 +0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sun, 22 Mar 2015 15:18:53 +0000
(15:18 +0000)
infra/dgit-repos-server
patch
|
blob
|
history
diff --git
a/infra/dgit-repos-server
b/infra/dgit-repos-server
index 7c447d288050856a281c51feb7fabe8770f68c6f..22e6ea7987980baf245456dff135785e181be689 100755
(executable)
--- a/
infra/dgit-repos-server
+++ b/
infra/dgit-repos-server
@@
-475,7
+475,7
@@
sub tagh1 ($) {
sub checks () {
debug "checks";
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";
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;
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]/) {
# check that our ref is being fast-forwarded
debug "oldcommit $oldcommit";
if ($oldcommit =~ m/[^0]/) {