pod2mdoc: Allow (ignored) nested escapes in L<>.

pod2mdoc: Allow (ignored) nested escapes in L<>.

[kristaps]

Log Message:
-----------
Allow (ignored) nested escapes in L<>.

Modified Files:
--------------
    pod2mdoc:
        pod2mdoc.1
        pod2mdoc.c

Revision Data
-------------
Index: pod2mdoc.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/pod2mdoc/pod2mdoc.c,v
retrieving revision 1.22
retrieving revision 1.23
diff -Lpod2mdoc.c -Lpod2mdoc.c -u -p -r1.22 -r1.23
--- pod2mdoc.c
+++ pod2mdoc.c
@@ -187,12 +187,18 @@ trylink(const char *buf, size_t *start, 
 	 * Scan to the start of the terminus. 
 	 * This function is more or less replicated in the formatcode()
 	 * for null or index formatting codes.
+	 * However, we're slightly different because we might have
+	 * nested escapes we need to ignore.
 	 */
 	stack = 0;
 	for (linkstart = realend = *start; realend < end; realend++) {
+		if ('<' == buf[realend])
+			stack++;
 		if ('>' != buf[realend])
 			continue;
-		else if (dsz == 1)
+		else if (stack-- > 0)
+			continue;
+		if (dsz == 1)
 			break;
 		assert(realend > 0);
 		if (' ' != buf[realend - 1])
Index: pod2mdoc.1
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/pod2mdoc/pod2mdoc.1,v
retrieving revision 1.12
retrieving revision 1.13
diff -Lpod2mdoc.1 -Lpod2mdoc.1 -u -p -r1.12 -r1.13
--- pod2mdoc.1
+++ pod2mdoc.1
@@ -262,6 +262,3 @@ escape is discarded.
 Unless solely a section link, the text and section parts of
 .Li L<text|link/section>
 are discarded.
-Moreover, nested format codes, e.g.
-.Li L<B<foo>|bar> ,
-are not supported.
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv