--- rxvt-unicode/doc/podtbl	2007/06/24 22:30:52	1.3
+++ rxvt-unicode/doc/podtbl	2016/06/22 07:30:52	1.6
@@ -22,8 +22,8 @@
       L => "i",    # broken
       F => "tt",
       S => "nobr", # non-std
-      X => "span", # brokwn
-      Z => "span", # brokwn
+      X => "span", # broken
+      Z => "span", # broken
    );
    # strip formatting codes, dumb version
    map {
@@ -44,7 +44,7 @@
       shift;
       return $self->SUPER::command (@_);
    }
-}  
+}
 
 sub verbatim {
    my ($self, $para) = @_;
@@ -67,7 +67,7 @@
 
    print $fh "\n=end text\n\n";
 
-   
+
    # tbl
    print $fh "=begin roff\n\n";
 
@@ -81,6 +81,10 @@
    # pod::xhtml fails on begin/end blocks
 #   print $fh "=begin xhtml\n\n";
 
+   print $fh "=for xhtml <table>";
+   print $fh map "<tr><td>" . +(join "</td><td>", htmlfcodes @$_) . "</td></tr>", @$table;
+   print $fh "</table>\n\n";
+
    print $fh "=for html <table>";
    print $fh map "<tr><td>" . +(join "</td><td>", htmlfcodes @$_) . "</td></tr>", @$table;
    print $fh "</table>\n\n";