nits in progs.pl

Reviewed-by: Neil Horman <nhorman@openssl.org>
Reviewed-by: Tomas Mraz <tomas@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/29243)

diff --git a/apps/progs.pl b/apps/progs.pl
index df2f8e32f92d73e9c28eef195de7b5ddc4349579..7abc483a9b933eafb6794d701d1c05d1f3232e3c 100644 (file)
--- a/apps/progs.pl
+++ b/apps/progs.pl
@@ -19,7 +19,7 @@ die "Unrecognised option, must be -C or -H\n"
     unless ($opt eq '-H' || $opt eq '-C');
 
 my %commands     = ();
-# XXX beck I think it is best reconsidered in favour of just a table
+# I think it is best reconsidered in favour of just a table
 # of commands instead of this fragile regex. There really are not that
 # many commands.
 my $cmdre        = qr/^\s*(int\s+|)\s*([a-z_][a-z0-9_]*)_main\s*\(\s*int\s+argc\s*,/;