summaryrefslogtreecommitdiff
path: root/autodoc.pl
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2020-07-22 08:44:38 -0600
committerKarl Williamson <khw@cpan.org>2020-09-04 16:13:24 -0600
commit27104915c310afc4d6159269915a4f0e177e09a4 (patch)
treeefa16b57f1789a74f9bed7331409f0ec948446d4 /autodoc.pl
parentbb05203f441fe4aeac7b5e8a6434bcde115333ca (diff)
downloadperl-27104915c310afc4d6159269915a4f0e177e09a4.tar.gz
autodoc.pl: Add C<...> around some text
Diffstat (limited to 'autodoc.pl')
-rw-r--r--autodoc.pl8
1 files changed, 4 insertions, 4 deletions
diff --git a/autodoc.pl b/autodoc.pl
index caa685c249..c2fdcd3698 100644
--- a/autodoc.pl
+++ b/autodoc.pl
@@ -248,11 +248,11 @@ removed without notice.\n\n$docs" if $flags =~ /x/;
my $p = (($flags =~ /p/ && $flags =~ /o/ && $flags !~ /M/)
|| ($flags =~ /f/ && $flags !~ /T/)); # Can't handle threaded varargs
- $docs .= "NOTE: the perl_ form of this function is deprecated.\n\n"
+ $docs .= "NOTE: the C<perl_> form of this function is deprecated.\n\n"
if $flags =~ /O/;
if ($p) {
- $docs .= "NOTE: this function must be explicitly called as Perl_$name";
- $docs .= " with an aTHX_ parameter" if $flags !~ /T/;
+ $docs .= "NOTE: this function must be explicitly called as C<Perl_$name>";
+ $docs .= " with an C<aTHX_> parameter" if $flags !~ /T/;
$docs .= ".\n\n"
}
@@ -381,7 +381,7 @@ _EOB_
print $fh "\n=over\n\n";
for my $missing (sort @$missing) {
- print $fh "=item $missing\nX<$missing>\n\n";
+ print $fh "=item C<$missing>\nX<$missing>\n\n";
}
print $fh "=back\n\n";
}