Merge branch '15' of git://github.com/ahalbert/Pod-To-HTML into ahalb…

…ert-15
Raku · Aug 11, 2018 · 418db99 · 418db99
2 parents f4e0b89 + 8c73436
commit 418db99
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/lib/Pod/To/HTML.pm b/lib/Pod/To/HTML.pm
@@ -340,8 +340,11 @@ multi sub node2html(Pod::Block::Named $node) {
         }
         when 'para' { return node2html($node.contents[0]); }
         when 'defn' {
-            return node2html($node.contents[0]) ~ "\n"
-                    ~ node2html($node.contents[1..*-1]);
+            return "<dl>" ~
+                    "<dt>" ~ node2html($node.contents[0].contents[1]) ~ "</dt>" ~
+                    "<dd>" ~ node2html($node.contents[0].contents[2..*-1]) ~ "</dd>" ~
+                "</dl>\n" ~
+                node2html($node.contents[1..*-1]);
         }
         when 'Image' {
             my $url;