In support of #932570. Now there is only one caller of
archive_api_query_cmd.
It is OK to pass `undef' because
- archive_
No functional change.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
badusage __ "need only 1 subpath argument" unless @ARGV==1;
my ($subpath) = @ARGV;
local $isuite = 'DGIT-API-QUERY-CMD';
- my @cmd = archive_api_query_cmd($subpath);
- push @cmd, qw(-f);
- debugcmd ">",@cmd;
- exec @cmd or fail f_ "exec curl: %s\n", $!;
+ my $json = api_query_raw $subpath;
+ print $json or die "$!";
}
sub repos_server_url () {