summaryrefslogtreecommitdiff
path: root/pod/pod2man.PL
diff options
context:
space:
mode:
authorAchim Bohnet <ach@mpe.mpg.de>1998-02-11 18:29:20 +0100
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1998-02-12 16:36:53 +0000
commitb74bceb9cc5d8f31510279b2c34ea465fe21fd8f (patch)
tree5e696dd77590856173a4d19bfa5c0d89b5779fd0 /pod/pod2man.PL
parentda9788ee9703522615b8d8b2baff4bef1b196a10 (diff)
downloadperl-b74bceb9cc5d8f31510279b2c34ea465fe21fd8f.tar.gz
5.004_58 | _04: pod2*,perlpod: L<show this|man/section>
p4raw-id: //depot/perl@508
Diffstat (limited to 'pod/pod2man.PL')
-rw-r--r--pod/pod2man.PL3
1 files changed, 3 insertions, 0 deletions
diff --git a/pod/pod2man.PL b/pod/pod2man.PL
index 5c8afc7a6d..5e5dfb0b66 100644
--- a/pod/pod2man.PL
+++ b/pod/pod2man.PL
@@ -801,6 +801,9 @@ while (<>) {
# no break -- usually we want C<> for this
s/S<([^<>]*)>/nobreak($1)/eg;
+ # LREF: a la HREF L<show this text|man/section>
+ s:L<([^|>]+)\|[^>]+>:$1:g;
+
# LREF: a manpage(3f)
s:L<([a-zA-Z][^\s\/]+)(\([^\)]+\))?>:the I<$1>$2 manpage:g;