commit 668e3799bdba5683bba42b8012d0d2a06acc8e1d
parent 63f8793e786c5d8c84a2ccd482a8b3773f248057
Author: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 21 Dec 2015 15:35:34 -0700
HTML output: refine handling of a table in a bullet
Avoid a blank bullet line when an item start with a "boxed"
table for `defform` and similar.
Diffstat:
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/scribble-lib/scribble/html-render.rkt b/scribble-lib/scribble/html-render.rkt
@@ -1679,7 +1679,7 @@
(style->attribs (table-style t)
(append
(if starting-item?
- '([style "display: inline-table; vertical-align: text-top;"])
+ '([style "display: inline-table; vertical-align: text-top; margin-top: 0;"])
null)
(if (for/or ([cell-styles (in-list cell-styless)])
(for/or ([cell-style (in-list cell-styles)])