diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2015-05-02 17:45:12 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2015-05-31 11:54:08 +0100 |
commit | 2d2bbb5a3356b960f18683773c6b370bcce9660f (patch) | |
tree | 6423f2973db82688c747a95b78e49402dc9bda3a | |
parent | 2965f30cca23b1cb7c1cf1d764b4f6b571f0a78e (diff) |
dgit-repos-server: Break out policy_checkpackage() (nfc)
-rwxr-xr-x | infra/dgit-repos-server | 20 |
1 files changed, 12 insertions, 8 deletions
diff --git a/infra/dgit-repos-server b/infra/dgit-repos-server index 3f9298f..2be40c5 100755 --- a/infra/dgit-repos-server +++ b/infra/dgit-repos-server @@ -323,6 +323,17 @@ sub movetogarbage () { or die "$garbagerepo $!"; } +sub policy_checkpackage () { + my $lfh = lockrealtree(); + + $policy = policyhook(FRESHREPO,'check-package',$package); + if ($policy & FRESHREPO) { + movetogarbage(); + } + + close $lfh; +} + #----- git-receive-pack ----- sub fixmissing__git_receive_pack () { @@ -839,14 +850,7 @@ sub mode_ssh () { reject "unknown method" unless $mainfunc; - my $lfh = lockrealtree(); - - $policy = policyhook(FRESHREPO,'check-package',$package); - if ($policy & FRESHREPO) { - movetogarbage; - } - - close $lfh; + policy_checkpackage(); if (stat_exists realdestrepo) { $destrepo = realdestrepo; |