badwords.pl: fix variable in printf mask
Causing warnings if a matched line has mask patterns.
Closes #19534
diff --git a/.github/scripts/badwords.pl b/.github/scripts/badwords.pl
index c6229f4..e119617 100755
--- a/.github/scripts/badwords.pl
+++ b/.github/scripts/badwords.pl
@@ -94,7 +94,7 @@
}
print STDERR "$f:$l:$c: error: found bad word \"$w\"\n";
- printf STDERR " %4d | $in\n", $l;
+ printf STDERR " %4d | %s\n", $l, $in;
printf STDERR " | %*s^%s\n", length($p), " ",
"~" x (length($w)-1);
printf STDERR " maybe use \"%s\" instead?\n", $alt{$w};