From 9d4b6c52c3844e4939de2ab4f9ad5d4a1d754e74 Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Sat, 11 Apr 1998 05:21:14 +0000
Subject: [PATCH] Update the module index support to use the changed field
 separator for the input file to buildindex.py.

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

diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 272a328556d..a73c227bf6e 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -73,7 +73,7 @@ sub top_navigation_panel {
 }
 
 sub bot_navigation_panel {
-    "<div class=navigation><hr>"
+    "<p>\n<div class=navigation><hr>"
       . &make_nav_panel
       . "</div>"
 }
@@ -115,7 +115,7 @@ sub add_module_idx{
     open(MODIDXFILE, ">modindex.dat") || die "\n$!\n";
     foreach $key (keys %Modules) {
 	# dump the line in the data file; just use a dummy seqno field
-	print MODIDXFILE "$Modules{$key}\0$key###\n";
+	print MODIDXFILE "$Modules{$key}" . $IDXFILE_FIELD_SEP . "$key###\n";
     }
     close(MODIDXFILE);
     $index = `$myrootdir/tools/buildindex.py modindex.dat`;