chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
dgit-repos-server: tests: remove obsolete files
[dgit.git]
/
dgit-repos-server
diff --git
a/dgit-repos-server
b/dgit-repos-server
index 57cb5be11d2d07d5a26e6c01ed299e9ed71e136a..ad4cde561c391a0e5b780dcacef8033227d4c588 100755
(executable)
--- a/
dgit-repos-server
+++ b/
dgit-repos-server
@@
-451,6
+451,14
@@
sub checksuite () {
reject "unknown suite";
}
reject "unknown suite";
}
+sub tagh1 ($) {
+ my ($tag) = @_;
+ my $vals = $tagh{$tag};
+ reject "missing tag $tag in signed tag object" unless $vals;
+ reject "multiple tags $tag in signed tag object" unless @$vals == 1;
+ return $vals->[0];
+}
+
sub checks () {
debug "checks";
checksuite();
sub checks () {
debug "checks";
checksuite();
@@
-485,7
+493,6
@@
sub onwardpush () {
sub stunthook () {
debug "stunthook";
sub stunthook () {
debug "stunthook";
- print Dumper(\$ENV{GIT_DIR});
chdir $workrepo or die "chdir $workrepo: $!";
mkdir "dgit-tmp" or $!==EEXIST or die $!;
readupdates();
chdir $workrepo or die "chdir $workrepo: $!";
mkdir "dgit-tmp" or $!==EEXIST or die $!;
readupdates();