From 2903d03e2d5c9d76d209b35896c3bb4ccd0e1869 Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Fri, 24 Jul 1998 22:13:37 +0000
Subject: tohtml():  Make module names anchors.

---
 Doc/perl/SynopsisTable.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Doc/perl/SynopsisTable.pm b/Doc/perl/SynopsisTable.pm
index 282a9dc..b391a6a 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;
-- 
cgit v0.12