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 c6229f4ad402235ff7e835ed913552313ae96214..e119617d0a9a70120a502e6e1bef7c93001bf56a 100755 (executable)
--- a/.github/scripts/badwords.pl
+++ b/.github/scripts/badwords.pl
@@ -94,7 +94,7 @@ sub file {
                 }
 
                 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};