correct horizontal spacing of data cells

[mandoc.git] / mdoc_html.c

diff --git a/mdoc_html.c b/mdoc_html.c
index 4f1ee482ad15b5dfde35af0ebe129014a68f273b..15d87f7e8bd371dc10cd787965d403126c07afb9 100644 (file)
--- a/mdoc_html.c
+++ b/mdoc_html.c
@@ -1,4 +1,4 @@
-/*     $Id: mdoc_html.c,v 1.126 2010/12/17 10:37:26 kristaps Exp $ */
+/*     $Id: mdoc_html.c,v 1.144 2011/01/13 14:30:13 kristaps Exp $ */
 /*
  * Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
  *
@@ -287,7 +287,7 @@ a2width(const char *p, struct roffsu *su)
 {
 
        if ( ! a2roffsu(p, su, SCALE_MAX)) {
-               su->unit = SCALE_EM;
+               su->unit = SCALE_BU;
                su->scale = (int)strlen(p);
        }
 }
@@ -354,7 +354,7 @@ a2offs(const char *p, struct roffsu *su)
        else if (0 == strcmp(p, "indent-two"))
                SCALE_HS_INIT(su, INDENT * 2);
        else if ( ! a2roffsu(p, su, SCALE_MAX)) {
-               su->unit = SCALE_EM;
+               su->unit = SCALE_BU;
                su->scale = (int)strlen(p);
        }
 }
@@ -420,9 +420,32 @@ print_mdoc_node(MDOC_ARGS)
                child = mdoc_root_pre(m, n, h);
                break;
        case (MDOC_TEXT):
+               /* No tables in this mode... */
+               assert(NULL == h->tblt);
+               if (' ' == *n->string && MDOC_LINE & n->flags)
+                       print_otag(h, TAG_BR, 0, NULL);
                print_text(h, n->string);
                return;
+       case (MDOC_TBL):
+               /*
+                * This will take care of initialising all of the table
+                * state data for the first table, then tearing it down
+                * for the last one.
+                */
+               print_tbl(h, n->span);
+               return;
        default:
+               /*
+                * Close out the current table, if it's open, and unset
+                * the "meta" table state.  This will be reopened on the
+                * next table element.
+                */
+               if (h->tblt) {
+                       print_tblclose(h);
+                       t = h->tags.head;
+               }
+
+               assert(NULL == h->tblt);
                if (mdocs[n->tok].pre && ENDBODY_NOT == n->end)
                        child = (*mdocs[n->tok].pre)(m, n, h);
                break;
@@ -461,15 +484,24 @@ print_mdoc_node(MDOC_ARGS)
 static void
 mdoc_root_post(MDOC_ARGS)
 {
-       struct htmlpair  tag[2];
+       struct htmlpair  tag[3];
        struct tag      *t, *tt;
        char             b[DATESIZ];
 
        time2a(m->date, b, DATESIZ);
 
-       PAIR_CLASS_INIT(&tag[0], "foot");
-       PAIR_SUMMARY_INIT(&tag[1], "Document Footer");
-       t = print_otag(h, TAG_TABLE, 2, tag);
+       PAIR_SUMMARY_INIT(&tag[0], "Document Footer");
+       PAIR_CLASS_INIT(&tag[1], "foot");
+       if (NULL == h->style) {
+               PAIR_INIT(&tag[2], ATTR_WIDTH, "100%");
+               t = print_otag(h, TAG_TABLE, 3, tag);
+               PAIR_INIT(&tag[0], ATTR_WIDTH, "50%");
+               print_otag(h, TAG_COL, 1, tag);
+               print_otag(h, TAG_COL, 1, tag);
+       } else
+               t = print_otag(h, TAG_TABLE, 2, tag);
+
+       t = print_otag(h, TAG_TBODY, 0, NULL);
 
        tt = print_otag(h, TAG_TR, 0, NULL);
 
@@ -480,7 +512,11 @@ mdoc_root_post(MDOC_ARGS)
        print_stagq(h, tt);
 
        PAIR_CLASS_INIT(&tag[0], "foot-os");
-       print_otag(h, TAG_TD, 1, tag);
+       if (NULL == h->style) {
+               PAIR_INIT(&tag[1], ATTR_ALIGN, "right");
+               print_otag(h, TAG_TD, 2, tag);
+       } else 
+               print_otag(h, TAG_TD, 1, tag);
 
        print_text(h, m->os);
        print_tagq(h, t);
@@ -505,9 +541,19 @@ mdoc_root_pre(MDOC_ARGS)
 
        snprintf(title, BUFSIZ - 1, "%s(%s)", m->title, m->msec);
 
-       PAIR_CLASS_INIT(&tag[0], "head");
-       PAIR_SUMMARY_INIT(&tag[1], "Document Header");
-       t = print_otag(h, TAG_TABLE, 2, tag);
+       PAIR_SUMMARY_INIT(&tag[0], "Document Header");
+       PAIR_CLASS_INIT(&tag[1], "head");
+       if (NULL == h->style) {
+               PAIR_INIT(&tag[2], ATTR_WIDTH, "100%");
+               t = print_otag(h, TAG_TABLE, 3, tag);
+               PAIR_INIT(&tag[0], ATTR_WIDTH, "30%");
+               print_otag(h, TAG_COL, 1, tag);
+               print_otag(h, TAG_COL, 1, tag);
+               print_otag(h, TAG_COL, 1, tag);
+       } else
+               t = print_otag(h, TAG_TABLE, 2, tag);
+
+       print_otag(h, TAG_TBODY, 0, NULL);
 
        tt = print_otag(h, TAG_TR, 0, NULL);
 
@@ -518,13 +564,21 @@ mdoc_root_pre(MDOC_ARGS)
        print_stagq(h, tt);
 
        PAIR_CLASS_INIT(&tag[0], "head-vol");
-       print_otag(h, TAG_TD, 1, tag);
+       if (NULL == h->style) {
+               PAIR_INIT(&tag[1], ATTR_ALIGN, "center");
+               print_otag(h, TAG_TD, 2, tag);
+       } else 
+               print_otag(h, TAG_TD, 1, tag);
 
        print_text(h, b);
        print_stagq(h, tt);
 
        PAIR_CLASS_INIT(&tag[0], "head-rtitle");
-       print_otag(h, TAG_TD, 1, tag);
+       if (NULL == h->style) {
+               PAIR_INIT(&tag[1], ATTR_ALIGN, "right");
+               print_otag(h, TAG_TD, 2, tag);
+       } else 
+               print_otag(h, TAG_TD, 1, tag);
 
        print_text(h, title);
        print_tagq(h, t);
@@ -593,7 +647,7 @@ mdoc_fl_pre(MDOC_ARGS)
        struct htmlpair  tag;
 
        PAIR_CLASS_INIT(&tag, "flag");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_B, 1, &tag);
 
        /* `Cm' has no leading hyphen. */
 
@@ -640,7 +694,7 @@ mdoc_nm_pre(MDOC_ARGS)
        case (MDOC_ELEM):
                synopsis_pre(h, n);
                PAIR_CLASS_INIT(&tag, "name");
-               print_otag(h, TAG_SPAN, 1, &tag);
+               print_otag(h, TAG_B, 1, &tag);
                if (NULL == n->child && m->name)
                        print_text(h, m->name);
                return(1);
@@ -732,7 +786,7 @@ mdoc_ar_pre(MDOC_ARGS)
        struct htmlpair tag;
 
        PAIR_CLASS_INIT(&tag, "arg");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_I, 1, &tag);
        return(1);
 }
 
@@ -794,6 +848,7 @@ mdoc_bx_pre(MDOC_ARGS)
        return(0);
 }
 
+/* ARGSUSED */
 static int
 mdoc_it_pre(MDOC_ARGS)
 {
@@ -808,7 +863,7 @@ mdoc_it_pre(MDOC_ARGS)
 
        assert(bl);
 
-       type = bl->data.Bl->type;
+       type = bl->norm->Bl.type;
 
        assert(lists[type]);
        PAIR_CLASS_INIT(&tag[0], lists[type]);
@@ -834,10 +889,14 @@ mdoc_it_pre(MDOC_ARGS)
                case(LIST_ohang):
                        /* FALLTHROUGH */
                case(LIST_tag):
-                       SCALE_VS_INIT(&su, ! bl->data.Bl->comp);
+                       SCALE_VS_INIT(&su, ! bl->norm->Bl.comp);
                        bufcat_su(h, "margin-top", &su);
                        PAIR_STYLE_INIT(&tag[1], h);
                        print_otag(h, TAG_DT, 2, tag);
+                       if (LIST_diag != type)
+                               break;
+                       PAIR_CLASS_INIT(&tag[0], "diag");
+                       print_otag(h, TAG_B, 1, tag);
                        break;
                case(LIST_column):
                        break;
@@ -855,7 +914,7 @@ mdoc_it_pre(MDOC_ARGS)
                case(LIST_enum):
                        /* FALLTHROUGH */
                case(LIST_item):
-                       SCALE_VS_INIT(&su, ! bl->data.Bl->comp);
+                       SCALE_VS_INIT(&su, ! bl->norm->Bl.comp);
                        bufcat_su(h, "margin-top", &su);
                        PAIR_STYLE_INIT(&tag[1], h);
                        print_otag(h, TAG_LI, 2, tag);
@@ -869,17 +928,17 @@ mdoc_it_pre(MDOC_ARGS)
                case(LIST_ohang):
                        /* FALLTHROUGH */
                case(LIST_tag):
-                       if (NULL == bl->data.Bl->width) {
+                       if (NULL == bl->norm->Bl.width) {
                                print_otag(h, TAG_DD, 1, tag);
                                break;
                        }
-                       a2width(bl->data.Bl->width, &su);
+                       a2width(bl->norm->Bl.width, &su);
                        bufcat_su(h, "margin-left", &su);
                        PAIR_STYLE_INIT(&tag[1], h);
                        print_otag(h, TAG_DD, 2, tag);
                        break;
                case(LIST_column):
-                       SCALE_VS_INIT(&su, ! bl->data.Bl->comp);
+                       SCALE_VS_INIT(&su, ! bl->norm->Bl.comp);
                        bufcat_su(h, "margin-top", &su);
                        PAIR_STYLE_INIT(&tag[1], h);
                        print_otag(h, TAG_TD, 2, tag);
@@ -904,18 +963,19 @@ mdoc_it_pre(MDOC_ARGS)
 static int
 mdoc_bl_pre(MDOC_ARGS)
 {
-       size_t           i;
+       int              i;
        struct htmlpair  tag[3];
        struct roffsu    su;
+       char             buf[BUFSIZ];
 
        if (MDOC_BODY == n->type) {
-               if (LIST_column == n->data.Bl->type)
+               if (LIST_column == n->norm->Bl.type)
                        print_otag(h, TAG_TBODY, 0, NULL);
                return(1);
        }
 
        if (MDOC_HEAD == n->type) {
-               if (LIST_column != n->data.Bl->type)
+               if (LIST_column != n->norm->Bl.type)
                        return(0);
 
                /*
@@ -925,10 +985,10 @@ mdoc_bl_pre(MDOC_ARGS)
                 * screen and we want to preserve that behaviour.
                 */
 
-               for (i = 0; i < n->data.Bl->ncols; i++) {
-                       a2width(n->data.Bl->cols[i], &su);
+               for (i = 0; i < (int)n->norm->Bl.ncols; i++) {
+                       a2width(n->norm->Bl.cols[i], &su);
                        bufinit(h);
-                       if (i < n->data.Bl->ncols - 1)
+                       if (i < (int)n->norm->Bl.ncols - 1)
                                bufcat_su(h, "width", &su);
                        else
                                bufcat_su(h, "min-width", &su);
@@ -944,20 +1004,19 @@ mdoc_bl_pre(MDOC_ARGS)
        bufcat_su(h, "margin-bottom", &su);
        PAIR_STYLE_INIT(&tag[0], h);
 
-       assert(lists[n->data.Bl->type]);
-       PAIR_CLASS_INIT(&tag[1], lists[n->data.Bl->type]);
-       i = 2;
+       assert(lists[n->norm->Bl.type]);
+       strlcpy(buf, "list ", BUFSIZ);
+       strlcat(buf, lists[n->norm->Bl.type], BUFSIZ);
+       PAIR_INIT(&tag[1], ATTR_CLASS, buf);
 
        /* Set the block's left-hand margin. */
 
-       if (n->data.Bl->offs) {
-               a2offs(n->data.Bl->offs, &su);
+       if (n->norm->Bl.offs) {
+               a2offs(n->norm->Bl.offs, &su);
                bufcat_su(h, "margin-left", &su);
-               PAIR_STYLE_INIT(&tag[2], h);
-               i = 3;
        }
 
-       switch (n->data.Bl->type) {
+       switch (n->norm->Bl.type) {
        case(LIST_bullet):
                /* FALLTHROUGH */
        case(LIST_dash):
@@ -965,10 +1024,10 @@ mdoc_bl_pre(MDOC_ARGS)
        case(LIST_hyphen):
                /* FALLTHROUGH */
        case(LIST_item):
-               print_otag(h, TAG_UL, i, tag);
+               print_otag(h, TAG_UL, 2, tag);
                break;
        case(LIST_enum):
-               print_otag(h, TAG_OL, i, tag);
+               print_otag(h, TAG_OL, 2, tag);
                break;
        case(LIST_diag):
                /* FALLTHROUGH */
@@ -979,10 +1038,10 @@ mdoc_bl_pre(MDOC_ARGS)
        case(LIST_ohang):
                /* FALLTHROUGH */
        case(LIST_tag):
-               print_otag(h, TAG_DL, i, tag);
+               print_otag(h, TAG_DL, 2, tag);
                break;
        case(LIST_column):
-               print_otag(h, TAG_TABLE, i, tag);
+               print_otag(h, TAG_TABLE, 2, tag);
                break;
        default:
                abort();
@@ -1000,11 +1059,14 @@ mdoc_ex_pre(MDOC_ARGS)
        struct tag              *t;
        struct htmlpair          tag;
 
+       if (n->prev)
+               print_otag(h, TAG_BR, 0, NULL);
+
        PAIR_CLASS_INIT(&tag, "utility");
 
        print_text(h, "The");
        for (nn = n->child; nn; nn = nn->next) {
-               t = print_otag(h, TAG_SPAN, 1, &tag);
+               t = print_otag(h, TAG_B, 1, &tag);
                print_text(h, nn->string);
                print_tagq(h, t);
 
@@ -1058,12 +1120,13 @@ mdoc_d1_pre(MDOC_ARGS)
 
        /* BLOCKQUOTE needs a block body. */
 
+       PAIR_CLASS_INIT(&tag[0], "display");
+       print_otag(h, TAG_DIV, 1, tag);
+
        if (MDOC_Dl == n->tok) {
-               PAIR_CLASS_INIT(&tag[0], "lit display");
-               print_otag(h, TAG_DIV, 1, tag);
-       } else
-               PAIR_CLASS_INIT(&tag[0], "display");
-               print_otag(h, TAG_DIV, 1, tag);
+               PAIR_CLASS_INIT(&tag[0], "lit");
+               print_otag(h, TAG_CODE, 1, tag);
+       } 
 
        return(1);
 }
@@ -1087,6 +1150,7 @@ mdoc_sx_pre(MDOC_ARGS)
        PAIR_CLASS_INIT(&tag[0], "link-sec");
        PAIR_HREF_INIT(&tag[1], buf);
 
+       print_otag(h, TAG_I, 1, tag);
        print_otag(h, TAG_A, 2, tag);
        return(1);
 }
@@ -1105,7 +1169,7 @@ mdoc_bd_pre(MDOC_ARGS)
                return(0);
 
        if (MDOC_BLOCK == n->type) {
-               comp = n->data.Bd->comp;
+               comp = n->norm->Bd.comp;
                for (nn = n; nn && ! comp; nn = nn->parent) {
                        if (MDOC_BLOCK != nn->type)
                                continue;
@@ -1120,14 +1184,14 @@ mdoc_bd_pre(MDOC_ARGS)
        }
 
        SCALE_HS_INIT(&su, 0);
-       if (n->data.Bd->offs)
-               a2offs(n->data.Bd->offs, &su);
+       if (n->norm->Bd.offs)
+               a2offs(n->norm->Bd.offs, &su);
 
        bufcat_su(h, "margin-left", &su);
        PAIR_STYLE_INIT(&tag[0], h);
 
-       if (DISP_unfilled != n->data.Bd->type && 
-                       DISP_literal != n->data.Bd->type) {
+       if (DISP_unfilled != n->norm->Bd.type && 
+                       DISP_literal != n->norm->Bd.type) {
                PAIR_CLASS_INIT(&tag[1], "display");
                print_otag(h, TAG_DIV, 2, tag);
                return(1);
@@ -1183,7 +1247,7 @@ mdoc_pa_pre(MDOC_ARGS)
        struct htmlpair tag;
 
        PAIR_CLASS_INIT(&tag, "file");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_I, 1, &tag);
        return(1);
 }
 
@@ -1195,7 +1259,7 @@ mdoc_ad_pre(MDOC_ARGS)
        struct htmlpair tag;
 
        PAIR_CLASS_INIT(&tag, "addr");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_I, 1, &tag);
        return(1);
 }
 
@@ -1222,7 +1286,7 @@ mdoc_cd_pre(MDOC_ARGS)
 
        synopsis_pre(h, n);
        PAIR_CLASS_INIT(&tag, "config");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_B, 1, &tag);
        return(1);
 }
 
@@ -1273,12 +1337,12 @@ mdoc_fa_pre(MDOC_ARGS)
 
        PAIR_CLASS_INIT(&tag, "farg");
        if (n->parent->tok != MDOC_Fo) {
-               print_otag(h, TAG_SPAN, 1, &tag);
+               print_otag(h, TAG_I, 1, &tag);
                return(1);
        }
 
        for (nn = n->child; nn; nn = nn->next) {
-               t = print_otag(h, TAG_SPAN, 1, &tag);
+               t = print_otag(h, TAG_I, 1, &tag);
                print_text(h, nn->string);
                print_tagq(h, t);
                if (nn->next)
@@ -1301,7 +1365,7 @@ mdoc_fd_pre(MDOC_ARGS)
        synopsis_pre(h, n);
 
        PAIR_CLASS_INIT(&tag, "macro");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_B, 1, &tag);
        return(1);
 }
 
@@ -1334,7 +1398,7 @@ mdoc_ft_pre(MDOC_ARGS)
 
        synopsis_pre(h, n);
        PAIR_CLASS_INIT(&tag, "ftype");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_I, 1, &tag);
        return(1);
 }
 
@@ -1359,7 +1423,7 @@ mdoc_fn_pre(MDOC_ARGS)
        ep = strchr(sp, ' ');
        if (NULL != ep) {
                PAIR_CLASS_INIT(&tag[0], "ftype");
-               t = print_otag(h, TAG_SPAN, 1, tag);
+               t = print_otag(h, TAG_I, 1, tag);
        
                while (ep) {
                        sz = MIN((int)(ep - sp), BUFSIZ - 1);
@@ -1390,7 +1454,7 @@ mdoc_fn_pre(MDOC_ARGS)
        }
 #endif
 
-       t = print_otag(h, TAG_SPAN, 1, tag);
+       t = print_otag(h, TAG_B, 1, tag);
 
        if (sp) {
                strlcpy(nbuf, sp, BUFSIZ);
@@ -1411,7 +1475,7 @@ mdoc_fn_pre(MDOC_ARGS)
                i = 1;
                if (MDOC_SYNPRETTY & n->flags)
                        i = 2;
-               t = print_otag(h, TAG_SPAN, i, tag);
+               t = print_otag(h, TAG_I, i, tag);
                print_text(h, nn->string);
                print_tagq(h, t);
                if (nn->next)
@@ -1557,7 +1621,7 @@ mdoc_fo_pre(MDOC_ARGS)
        assert(n->child->string);
 
        PAIR_CLASS_INIT(&tag, "fname");
-       t = print_otag(h, TAG_SPAN, 1, &tag);
+       t = print_otag(h, TAG_B, 1, &tag);
        print_text(h, n->child->string);
        print_tagq(h, t);
        return(0);
@@ -1588,7 +1652,7 @@ mdoc_in_pre(MDOC_ARGS)
        synopsis_pre(h, n);
 
        PAIR_CLASS_INIT(&tag[0], "includes");
-       print_otag(h, TAG_SPAN, 1, tag);
+       print_otag(h, TAG_B, 1, tag);
 
        if (MDOC_SYNPRETTY & n->flags && MDOC_LINE & n->flags)
                print_text(h, "#include");
@@ -1624,7 +1688,7 @@ mdoc_ic_pre(MDOC_ARGS)
        struct htmlpair tag;
 
        PAIR_CLASS_INIT(&tag, "cmd");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_B, 1, &tag);
        return(1);
 }
 
@@ -1637,12 +1701,14 @@ mdoc_rv_pre(MDOC_ARGS)
        struct htmlpair          tag;
        struct tag              *t;
 
-       print_otag(h, TAG_DIV, 0, NULL);
+       if (n->prev)
+               print_otag(h, TAG_BR, 0, NULL);
+
        print_text(h, "The");
 
        for (nn = n->child; nn; nn = nn->next) {
                PAIR_CLASS_INIT(&tag, "fname");
-               t = print_otag(h, TAG_SPAN, 1, &tag);
+               t = print_otag(h, TAG_B, 1, &tag);
                print_text(h, nn->string);
                print_tagq(h, t);
 
@@ -1664,7 +1730,7 @@ mdoc_rv_pre(MDOC_ARGS)
                        "-1 is returned and the global variable");
 
        PAIR_CLASS_INIT(&tag, "var");
-       t = print_otag(h, TAG_SPAN, 1, &tag);
+       t = print_otag(h, TAG_B, 1, &tag);
        print_text(h, "errno");
        print_tagq(h, t);
                print_text(h, "is set to indicate the error.");
@@ -1679,7 +1745,7 @@ mdoc_va_pre(MDOC_ARGS)
        struct htmlpair tag;
 
        PAIR_CLASS_INIT(&tag, "var");
-       print_otag(h, TAG_SPAN, 1, &tag);
+       print_otag(h, TAG_B, 1, &tag);
        return(1);
 }
 
@@ -1708,13 +1774,11 @@ mdoc_bf_pre(MDOC_ARGS)
        else if (MDOC_BODY != n->type)
                return(1);
 
-       assert(n->data.Bf);
-
-       if (FONT_Em == n->data.Bf->font) 
+       if (FONT_Em == n->norm->Bf.font) 
                PAIR_CLASS_INIT(&tag[0], "emph");
-       else if (FONT_Sy == n->data.Bf->font) 
+       else if (FONT_Sy == n->norm->Bf.font) 
                PAIR_CLASS_INIT(&tag[0], "symb");
-       else if (FONT_Li == n->data.Bf->font) 
+       else if (FONT_Li == n->norm->Bf.font) 
                PAIR_CLASS_INIT(&tag[0], "lit");
        else
                PAIR_CLASS_INIT(&tag[0], "none");
@@ -1833,8 +1897,9 @@ mdoc_lb_pre(MDOC_ARGS)
 {
        struct htmlpair tag;
 
-       if (SEC_LIBRARY == n->sec && MDOC_LINE & n->flags)
-               print_otag(h, TAG_DIV, 0, NULL);
+       if (SEC_LIBRARY == n->sec && MDOC_LINE & n->flags && n->prev)
+               print_otag(h, TAG_BR, 0, NULL);
+
        PAIR_CLASS_INIT(&tag, "lib");
        print_otag(h, TAG_SPAN, 1, &tag);
        return(1);
@@ -1846,6 +1911,9 @@ static int
 mdoc__x_pre(MDOC_ARGS)
 {
        struct htmlpair tag[2];
+       enum htmltag    t;
+
+       t = TAG_SPAN;
 
        switch (n->tok) {
        case(MDOC__A):
@@ -1856,6 +1924,7 @@ mdoc__x_pre(MDOC_ARGS)
                break;
        case(MDOC__B):
                PAIR_CLASS_INIT(&tag[0], "ref-book");
+               t = TAG_I;
                break;
        case(MDOC__C):
                PAIR_CLASS_INIT(&tag[0], "ref-city");
@@ -1865,9 +1934,11 @@ mdoc__x_pre(MDOC_ARGS)
                break;
        case(MDOC__I):
                PAIR_CLASS_INIT(&tag[0], "ref-issue");
+               t = TAG_I;
                break;
        case(MDOC__J):
                PAIR_CLASS_INIT(&tag[0], "ref-jrnl");
+               t = TAG_I;
                break;
        case(MDOC__N):
                PAIR_CLASS_INIT(&tag[0], "ref-num");
@@ -1899,7 +1970,7 @@ mdoc__x_pre(MDOC_ARGS)
        }
 
        if (MDOC__U != n->tok) {
-               print_otag(h, TAG_SPAN, 1, tag);
+               print_otag(h, t, 1, tag);
                return(1);
        }
 
@@ -1940,7 +2011,8 @@ mdoc_bk_pre(MDOC_ARGS)
        case (MDOC_HEAD):
                return(0);
        case (MDOC_BODY):
-               h->flags |= HTML_PREKEEP;
+               if (n->parent->args || 0 == n->prev->nchild)
+                       h->flags |= HTML_PREKEEP;
                break;
        default:
                abort();