diff options
author | Karl Williamson <khw@cpan.org> | 2021-04-14 09:56:51 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2021-04-14 10:16:17 -0600 |
commit | e73c00e2879051ea3c298e4e52ff61b3fedcbea0 (patch) | |
tree | cddd1df680e66b89cfc8383ae686f1768288ca48 | |
parent | 3c3f883d1ac1fc6048277d2d60015c66c211ac9b (diff) | |
download | perl-e73c00e2879051ea3c298e4e52ff61b3fedcbea0.tar.gz |
autodoc.pl: 'G' is a legitimate embed.fnc flag
-rw-r--r-- | autodoc.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/autodoc.pl b/autodoc.pl index a9f6f6bf67..b5bfc74566 100644 --- a/autodoc.pl +++ b/autodoc.pl @@ -504,7 +504,7 @@ sub autodoc ($$) { # parse a file and extract documentation info } die "flag '$1' is not legal (for function $element_name (from $file))" - if $flags =~ / ( [^AabCDdEeFfhiMmNnTOoPpRrSsUuWXxy] ) /x; + if $flags =~ / ( [^AabCDdEeFfGhiMmNnTOoPpRrSsUuWXxy] ) /x; die "'u' flag must also have 'm' or 'y' flags' for $element_name" if $flags =~ /u/ && $flags !~ /[my]/; |