From 0cc2e3f30a4939363ff7b444ecb22f725b3e69e9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Wed, 2 Nov 2016 01:39:02 +0200 Subject: Handle labeled lists the same as normal lists Including support for lists continuations. --- src/asciideck_to_manpage.erl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'src/asciideck_to_manpage.erl') diff --git a/src/asciideck_to_manpage.erl b/src/asciideck_to_manpage.erl index fffd250..33187ea 100644 --- a/src/asciideck_to_manpage.erl +++ b/src/asciideck_to_manpage.erl @@ -111,15 +111,20 @@ man([_Ignore|Tail], Acc) -> man_ll([], Acc) -> Acc; -man_ll([{li, #{label := Label}, [{p, _PAttrs, Text, _PAnn}], _LiAnn}|Tail], Acc0) -> +man_ll([{li, #{label := Label}, Item, _LiAnn}|Tail], Acc0) -> Acc = [[ ".PP\n" "\\fB", Label, "\\fR\n", ".RS 4\n", - man_format(Text), "\n" + man_ll_item(Item), ".RE\n"]|Acc0], man_ll(Tail, Acc). +man_ll_item([{p, _PAttrs, Text, _PAnn}]) -> + [man_format(Text), "\n"]; +man_ll_item([{p, _PAttrs, Text, _PAnn}|Tail]) -> + [man_format(Text), "\n\n", man_ll_item(Tail)]. + man_ul([], Acc) -> Acc; man_ul([{li, _LiAttrs, [{p, _PAttrs, Text, _PAnn}], _LiAnn}|Tail], Acc0) -> -- cgit v1.2.3