sub apiquery ($) {
my ($subpath) = @_;
local $/=undef;
- my $cmd = "$dgitlive/dgit -d $distro \$DGIT_TEST_OPTS";
+ my $cmd = "$dgitlive/dgit -d$distro \$DGIT_TEST_OPTS";
$cmd .= " -".("D" x $debuglevel) if $debuglevel;
$cmd .= " archive-api-query $subpath";
printdebug "apiquery $cmd\n";
" removed from NEW (ie, rejected) (or never arrived)");
}
-sub action__check_package () {
+sub action_check_package () {
getpackage();
return 0 unless $pkg_exists;
return 0 unless $pkg_secret;