From e0c1740bc5cbc36ae5d05b87aa0358f5b1082c96 Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Tue, 5 Aug 2003 03:48:29 +0000
Subject: better support for well-formed XHTML

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

diff --git a/Doc/perl/ltxmarkup.perl b/Doc/perl/ltxmarkup.perl
index 290e79b..1a0f7e1 100644
--- a/Doc/perl/ltxmarkup.perl
+++ b/Doc/perl/ltxmarkup.perl
@@ -45,10 +45,10 @@ sub do_env_macrodesc{
     my $params = ltx_process_params(ltx_next_argument());
     return "\n<dl class='macrodesc'>"
          . "\n<dt><b><tt class='macro'>&#92;$macro</tt></b>"
-         . "\n    $params"
+         . "\n    $params</dt>"
 	 . "\n<dd>"
 	 . $_
-	 . "</dl>";
+	 . '</dd></dl>';
 }
 
 sub do_env_envdesc{
@@ -58,10 +58,10 @@ sub do_env_envdesc{
     return "\n<dl class='envdesc'>"
          . "\n<dt><tt>&#92;begin{<b class='environment'>$env</b>}</tt>"
          . "\n    $params"
-         . "\n<br /><tt>&#92;end{<b class='environment'>$env</b>}</tt>"
+         . "\n<br /><tt>&#92;end{<b class='environment'>$env</b>}</tt></dt>"
 	 . "\n<dd>"
 	 . $_
-	 . "</dl>";
+	 . '</dd></dl>';
 }
 
 1;				# Must end with this, because Perl is bogus.
-- 
cgit v0.12