mdocml: Properly discard \m colour escapes.

mdocml: Properly discard \m colour escapes.

[kristaps]

Log Message:
-----------
Properly discard \m colour escapes.  Noted by J.C. Roberts.

Modified Files:
--------------
    mdocml:
        TODO
        out.c

Revision Data
-------------
Index: out.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/out.c,v
retrieving revision 1.18
retrieving revision 1.19
diff -Lout.c -Lout.c -u -p -r1.18 -r1.19
--- out.c
+++ out.c
@@ -233,6 +233,22 @@ a2roffdeco(enum roffdeco *d, const char 
 			break;
 		}
 		break;
+	case ('M'):
+		/* FALLTHROUGH */
+	case ('m'):
+		switch (wp[i++]) {
+		case ('('):
+			lim = 2;
+			break;
+		case ('['):
+			term = ']';
+			break;
+		default:
+			i--;
+			lim = 1;
+			break;
+		}
+		break;
 	case ('s'):
 		if ('+' == wp[i] || '-' == wp[i])
 			i++;
Index: TODO
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/TODO,v
retrieving revision 1.29
retrieving revision 1.30
diff -LTODO -LTODO -u -p -r1.29 -r1.30
--- TODO
+++ TODO
@@ -68,9 +68,6 @@
 
 - have a blank `It' head for `Bl -tag' not puke
 
-- ignore horrendous m[] font colouring
-  reported by J.C. Roberts
-
 - prohibit `Nm' from having non-text HEAD children
   (e.g., NetBSD mDNSShared/dns-sd.1)
   (mdoc_html.c and mdoc_term.c `Nm' handlers can be slightly simplified)
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv