shr table rendering fix

* shr.el (shr-tag-table): Allow rendering body-less tables
that have headers.

1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index a48d098fe26..dbf45b885da 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1582,7 +1582,7 @@ The preference is a float determined from `shr-prefer-media-type'."
          (shr-stylesheet (nconc (list (cons 'background-color bgcolor))
                                 shr-stylesheet))
          (nheader (if header (shr-max-columns header)))
-         (nbody (if body (shr-max-columns body)))
+         (nbody (if body (shr-max-columns body) 0))
          (nfooter (if footer (shr-max-columns footer))))
     (if (and (not caption)
              (not header)