X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=blobdiff_plain;f=dgit;h=27dcf1c91e4a9288bb1693e5dc03488f08e5fcbc;hp=e86e398356fff4ce5462f23d71e894332698b008;hb=a090117492eafad326684b0dc49f73184f52d148;hpb=e02f981fe5cf91cecebccd004d033a5edd9b4af8

diff --git a/dgit b/dgit
index e86e3983..27dcf1c9 100755
--- a/dgit
+++ b/dgit
@@ -6456,6 +6456,7 @@ sub pre_archive_api_query () {
 sub cmd_archive_api_query {
     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;