summaryrefslogtreecommitdiff
path: root/contrib/texi2pod.pl
diff options
context:
space:
mode:
authorjsm28 <jsm28@138bc75d-0d04-0410-961f-82ee72b054a4>2001-01-15 23:32:25 +0000
committerjsm28 <jsm28@138bc75d-0d04-0410-961f-82ee72b054a4>2001-01-15 23:32:25 +0000
commit0dd06be9db9e26a47471bfe2160a181631d8453f (patch)
tree59804907045d19c07aea917b226efd5969cf821e /contrib/texi2pod.pl
parent97d97fccee1463fb620d97cce99092b8abbe81b2 (diff)
downloadgcc-0dd06be9db9e26a47471bfe2160a181631d8453f.tar.gz
contrib:
* texi2pod.pl: Fix regular expression for @r to avoid exponential recursion. From Russ Allbery <rra@stanford.edu>. Remove perl version check. gcc: * configure.in, configure: Revert previous patch requiring perl 5.6.0. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@39053 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'contrib/texi2pod.pl')
-rwxr-xr-xcontrib/texi2pod.pl4
1 files changed, 1 insertions, 3 deletions
diff --git a/contrib/texi2pod.pl b/contrib/texi2pod.pl
index cb8ff466f19..964c033df5e 100755
--- a/contrib/texi2pod.pl
+++ b/contrib/texi2pod.pl
@@ -4,8 +4,6 @@
# markup to Perl POD format. It's intended to be used to extract
# something suitable for a manpage from a Texinfo document.
-use v5.6.0;
-
$output = 0;
$skipping = 0;
%sects = ();
@@ -262,7 +260,7 @@ sub postprocess
s/\@(?:dmn|math)\{([^\}]*)\}/$1/g;
# Handle @r inside bold.
- 1 while s/B<((?:[^<>]*|I<[^<>*]*>)*)R<([^>]*)>/B<$1>${2}B</g;
+ 1 while s/B<((?:[^<>]|I<[^<>]*>)*)R<([^>]*)>/B<$1>${2}B</g;
# Cross references are thrown away, as are @noindent and @refill.
# (@noindent is impossible in .pod, and @refill is unnecessary.)