From 1bdaa9b8a6904f2b1735e47f8d7c32b985665ab9 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Tue, 4 Feb 2025 14:50:14 +0000 Subject: [PATCH] autopkgtest: properly quote $cs in perl scripts Signed-off-by: Ian Jackson --- adt/acommon | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/adt/acommon b/adt/acommon index 9612946..714245a 100644 --- a/adt/acommon +++ b/adt/acommon @@ -148,9 +148,9 @@ setup-host () { local unwanted_deps=$(perl -ne ' next if m{^(?:userv-utils|libnetaddr-ip-perl|net-tools)$}; next if m{^hippotat-'"$cs"'$}; - next if m{^(?:iptables|rsyslog|authbind)$} && '"$cs"' eq "server"; + next if m{^(?:iptables|rsyslog|authbind)$} && "'"$cs"'" eq "server"; # TODO for rsyslog, record bug number here - next if m{^(?:orphan-sysvinit-scripts)$} && '"$cs"' eq "server"; + next if m{^(?:orphan-sysvinit-scripts)$} && "'"$cs"'" eq "server"; print; ' $tmp/$cs-unwanted-deps) in- $cs apt-mark auto $unwanted_deps -- 2.30.2