Commit 3d5e2a94 authored by stefano's avatar stefano

Make texi2pod.pl process @include texinfo directives wherever they are

placed, and not only if inside @c man begin/end sections.

git-svn-id: file:///var/local/repositories/ffmpeg/trunk@23544 9553f0bf-9b14-0410-a0b8-cfaf0461ba5b
parent 48e93273
...@@ -100,6 +100,17 @@ while(<$inf>) { ...@@ -100,6 +100,17 @@ while(<$inf>) {
next; next;
}; };
/^\@include\s+(.+)$/ and do {
push @instack, $inf;
$inf = gensym();
# Try cwd and $ibase.
open($inf, "<" . $1)
or open($inf, "<" . $ibase . "/" . $1)
or die "cannot open $1 or $ibase/$1: $!\n";
next;
};
# Look for blocks surrounded by @c man begin SECTION ... @c man end. # Look for blocks surrounded by @c man begin SECTION ... @c man end.
# This really oughta be @ifman ... @end ifman and the like, but such # This really oughta be @ifman ... @end ifman and the like, but such
# would require rev'ing all other Texinfo translators. # would require rev'ing all other Texinfo translators.
...@@ -220,17 +231,6 @@ while(<$inf>) { ...@@ -220,17 +231,6 @@ while(<$inf>) {
# Single line command handlers. # Single line command handlers.
/^\@include\s+(.+)$/ and do {
push @instack, $inf;
$inf = gensym();
# Try cwd and $ibase.
open($inf, "<" . $1)
or open($inf, "<" . $ibase . "/" . $1)
or die "cannot open $1 or $ibase/$1: $!\n";
next;
};
/^\@(?:section|unnumbered|unnumberedsec|center)\s+(.+)$/ /^\@(?:section|unnumbered|unnumberedsec|center)\s+(.+)$/
and $_ = "\n=head2 $1\n"; and $_ = "\n=head2 $1\n";
/^\@subsection\s+(.+)$/ /^\@subsection\s+(.+)$/
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment