From bb584d3f6edf292d0c9cb3296a2a319161335eba Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Thu, 25 Mar 1999 22:18:30 +0000
Subject: [PATCH] Be more stylesheet friendly.

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

diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index e247c1b4750..8d737c0ee44 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -300,7 +300,8 @@ sub add_module_idx{
 	my $plat = '';
 	$key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/;
 	if ($ModulePlatforms{$key} && !$allthesame) {
-	    $plat = " <em>($ModulePlatforms{$key})</em>";
+	    $plat = (" <em>(<span class=platform>$ModulePlatforms{$key}"
+		     . '</span>)</em>');
 	}
 	print MODIDXFILE
 	  $moditem