tainted-objects (fix): Pass suite in check and use it for HEAD

This now produces the same answers as push would.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

1 files changed, 2 insertions, 1 deletions

diff --git a/dgit b/dgit
index 06e973a..583fe4a 100755
--- a/dgit
+++ b/dgit
@@ -4872,7 +4872,8 @@ ENDT
     if ($pq_supported !~ m/false/) {
 	my @cmd =
 	  (access_cfg_ssh, access_gituserhost(),
-	   access_runeinfo("policy-client-query $package tainted-objects ").
+	   access_runeinfo("policy-client-query $package tainted-objects ".
+			  join " ", $csuite).
 	   " true");
 	my $json = cmdoutput_errok @cmd;
 	if (!defined $json) {