From 998b7b2d7e3596d70b5afa642e37a5a7dd4ab6a3 Mon Sep 17 00:00:00 2001
From: Kristaps Dzonsons <kristaps@bsd.lv>
Date: Wed, 5 Jan 2011 13:00:11 +0000
Subject: Give tables an HTML class.

---
 example.style.css | 16 ++++++++++++----
 tbl_html.c        |  9 ++++++---
 2 files changed, 18 insertions(+), 7 deletions(-)

diff --git a/example.style.css b/example.style.css
index 75f9b382..7f640ee8 100644
--- a/example.style.css
+++ b/example.style.css
@@ -1,8 +1,12 @@
-/* $Id: example.style.css,v 1.40 2010/12/24 14:14:00 kristaps Exp $ */
+/* $Id: example.style.css,v 1.41 2011/01/05 13:00:11 kristaps Exp $ */
 
 /*
- * This default style-sheet mimics the appearance of the traditional
- * cvsweb output.
+ * This is an example style-sheet provided for mandoc(1) and the -Thtml
+ * or -Txhtml output mode.
+ *
+ * It mimics the appearance of the traditional cvsweb output.
+ *
+ * See mdoc(7) and man(7) for macro explanations.
  */
 
 html		{ min-width: 580px; width: 580px; }
@@ -96,7 +100,7 @@ a.link-man	{ } /* Manual links (Xr). */
 a.link-ref	{ } /* Reference section links (%Q). */
 a.link-sec	{ } /* Section links (Sx). */
 
-/* Formatting for lists. */
+/* Formatting for lists.  See mdoc(7). */
 
 dl.list-diag	{ }
 dt.list-diag	{ }
@@ -136,3 +140,7 @@ li.list-item	{ }
 
 ol.list-enum	{ padding-left: 2em; }
 li.list-enum	{ }
+
+/* Table modes.  See tbl(7). */
+
+table.tbl	{ }
diff --git a/tbl_html.c b/tbl_html.c
index 2abbf4ca..cda22b0c 100644
--- a/tbl_html.c
+++ b/tbl_html.c
@@ -1,4 +1,4 @@
-/*	$Id: tbl_html.c,v 1.2 2011/01/04 15:02:00 kristaps Exp $ */
+/*	$Id: tbl_html.c,v 1.3 2011/01/05 13:00:11 kristaps Exp $ */
 /*
  * Copyright (c) 2009 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -32,7 +32,8 @@ print_tbl(struct html *h, const struct tbl_span *sp)
 {
 	const struct tbl_head *hp;
 	const struct tbl_dat *dp;
-	struct tag	 *tt;
+	struct tag	*tt;
+	struct htmlpair	 tag;
 
 	switch (sp->pos) {
 	case (TBL_SPAN_HORIZ):
@@ -48,7 +49,9 @@ print_tbl(struct html *h, const struct tbl_span *sp)
 	h->flags |= HTML_NONOSPACE;
 	h->flags |= HTML_NOSPACE;
 
-	print_otag(h, TAG_TABLE, 0, NULL);
+	PAIR_CLASS_INIT(&tag, "tbl");
+
+	print_otag(h, TAG_TABLE, 1, &tag);
 	print_otag(h, TAG_TR, 0, NULL);
 
 	dp = sp->first;
-- 
cgit v1.2.3