From: Fred Drake <fdrake@acm.org>
Date: Tue, 9 May 2000 16:17:51 +0000 (+0000)
Subject: do_cmd_seeurl():  New function.
X-Git-Tag: v2.0b1~1794
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=ef4d111b2a88ab036c6644227ff2115eedf20c89;p=python

do_cmd_seeurl():  New function.
---

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 4033c62687..6dfa018896 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();