RepoMirrors
/
ffmpeg
mirror of https://git.ffmpeg.org/ffmpeg.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

doc/texi2pod: add support to @ifhtml and @ifnothtml directives 

With these commands it is possible to add HTML and non-HTML snippets,
which will be useful for the "See Also" manual chapters.
This commit is contained in:
Stefano Sabatini 2012-12-16 20:16:43 +01:00
parent 992772b947
commit f14e248783
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
doc/texi2pod.pl
View File

@ -150,14 +150,14 @@ INF: while(<$inf>) {
# Ignore @end foo, where foo is not an operation which may # Ignore @end foo, where foo is not an operation which may
# cause us to skip, if we are presently skipping. # cause us to skip, if we are presently skipping.
my $ended = $1; my $ended = $1;
next if $skipping && $ended !~ /^(?:ifset|ifclear|ignore|menu|iftex)$/; next if $skipping && $ended !~ /^(?:ifset|ifclear|ignore|menu|iftex|ifhtml|ifnothtml)$/;
die "\@end $ended without \@$ended at line $.\n" unless defined $endw; die "\@end $ended without \@$ended at line $.\n" unless defined $endw;
die "\@$endw ended by \@end $ended at line $.\n" unless $ended eq $endw; die "\@$endw ended by \@end $ended at line $.\n" unless $ended eq $endw;
$endw = pop @endwstack; $endw = pop @endwstack;
if ($ended =~ /^(?:ifset|ifclear|ignore|menu|iftex)$/) { if ($ended =~ /^(?:ifset|ifclear|ignore|menu|iftex|ifhtml|ifnothtml)$/) {
$skipping = pop @skstack; $skipping = pop @skstack;
next; next;
} elsif ($ended =~ /^(?:example|smallexample|display)$/) { } elsif ($ended =~ /^(?:example|smallexample|display)$/) {
@ -190,11 +190,11 @@ INF: while(<$inf>) {
next; next;
}; };
/^\@(ignore|menu|iftex)\b/ and do { /^\@(ignore|menu|iftex|ifhtml|ifnothtml)\b/ and do {
push @endwstack, $endw; push @endwstack, $endw;
push @skstack, $skipping; push @skstack, $skipping;
$endw = $1; $endw = $1;
$skipping = 1; $skipping = $endw !~ /ifnothtml/;
next; next;
}; };