summaryrefslogtreecommitdiffstats
path: root/Doc
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2000-05-09 16:17:51 (GMT)
committerFred Drake <fdrake@acm.org>2000-05-09 16:17:51 (GMT)
commitef4d111b2a88ab036c6644227ff2115eedf20c89 (patch)
tree89011a7fb49b5e69be2a4632c7ccadd403ede904 /Doc
parentd85f05940e00e1e2b9665016c99100f5bebcd1ea (diff)
downloadcpython-ef4d111b2a88ab036c6644227ff2115eedf20c89.zip
cpython-ef4d111b2a88ab036c6644227ff2115eedf20c89.tar.gz
cpython-ef4d111b2a88ab036c6644227ff2115eedf20c89.tar.bz2
do_cmd_seeurl(): New function.
Diffstat (limited to 'Doc')
-rw-r--r--Doc/perl/python.perl11
1 files changed, 11 insertions, 0 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 4033c62..6dfa018 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -1288,6 +1288,17 @@ sub do_cmd_seerfc{
. $_;
}
+sub do_cmd_seeurl{
+ local($_) = @_;
+ my $url = next_argument();
+ my $text = next_argument();
+ return '<dl compact class="seeurl">'
+ . "\n <dt><a href=\"$url\""
+ . "\n class=\"url\">$url</a>"
+ . "\n <dd>$text\n </dl>"
+ . $_;
+}
+
sub do_cmd_seetext{
local($_) = @_;
my $content = next_argument();