diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index b7ade49..da371bd 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -577,7 +577,7 @@
 # initialize() is called in the main LaTeX2HTML script (which happens
 # before style files are loaded).
 #
-%declarations = ('preform' => '<dl><dd><pre class="verbatim"></pre></dl>',
+%declarations = ('preform' => '<div class="verbatim"><pre></pre></div>',
 		 %declarations);
 
 
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 5da9710..e8a4d47 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -1915,8 +1915,8 @@
 _RAW_ARG_DEFERRED_CMDS_
 
 
-$alltt_start = '<dl><dd><pre class="verbatim">';
-$alltt_end = '</pre></dl>';
+$alltt_start = '<div class="verbatim"><pre>';
+$alltt_end = '</pre></div>';
 
 sub do_env_alltt {
     local ($_) = @_;
@@ -2008,12 +2008,12 @@
     else {
         $text = '<b>Could not locate requested file <i>$fname</i>!</b>\n';
     }
-    return ('<dl><dd><pre class="verbatim">'
+    return ("<div class=\"verbatim\">\n<pre>"
             . $text
-            . "</pre>\n<div class=\"verbatiminput-footer\">\n"
+            . "</pre>\n<div class=\"footer\">\n"
             . "<a href=\"$srcname.txt\" type=\"text/plain\""
             . ">Download as text.</a>"
-            . "\n</div>\n</dd></dl>"
+            . "\n</div></div>"
             . $_);
 }