From: Fred Drake <fdrake@acm.org>
Date: Fri, 24 Jul 1998 22:13:37 +0000 (+0000)
Subject: tohtml():  Make module names anchors.
X-Git-Tag: v1.5.2a1~220
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=2903d03e2d5c9d76d209b35896c3bb4ccd0e1869;p=python

tohtml():  Make module names anchors.
---

diff --git a/Doc/perl/SynopsisTable.pm b/Doc/perl/SynopsisTable.pm
index 282a9dc99d..b391a6af59 100644
--- a/Doc/perl/SynopsisTable.pm
+++ b/Doc/perl/SynopsisTable.pm
@@ -42,7 +42,8 @@ sub tohtml{
     my $name;
     foreach $name (split /,/, $self->{names}) {
 	my($key,$type,$synopsis) = $self->get($name);
-	$data .= "<dt><b><tt>$name</tt></b>\n<dd>$synopsis\n";
+	$data .= ("<dt><b><tt><a href=\"module-$key.html\">$name</a></tt></b>"
+		  . "\n<dd>$synopsis\n");
     }
     $data .= "</dl>\n";
     $data;