We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 03163db + 05194cc commit 32bc13cCopy full SHA for 32bc13c
lib/Doxygen/Filter/Perl/POD.pm
@@ -117,13 +117,25 @@ sub view_head4
117
return "\n\@paragraph $sectionLabel$name$labelCnt $title\n" . $head4->content->present($self);
118
}
119
120
-sub view_seq_code
+
121
+sub view_seq_code
122
{
123
my ($self, $text) = @_;
- return "\n\@code\n$text\n\@endcode\n";
124
+ $text =~ s/"/\\"/g;
125
+ return "<code>$text</code>";
126
127
128
129
+sub view_verbatim {
130
+ my ($self, $text) = @_;
131
+ for ($text) {
132
+ s/&/&/g;
133
+ s/</</g;
134
+ s/>/>/g;
135
+ s/-/\\-/g;
136
+ }
137
+ return "<pre>$text</pre>\n\n";
138
+}
139
140
141
=head1 NAME
0 commit comments