diff options
Diffstat (limited to 'src/asciideck_parser.erl')
-rw-r--r-- | src/asciideck_parser.erl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/asciideck_parser.erl b/src/asciideck_parser.erl index 7d81112..9755d29 100644 --- a/src/asciideck_parser.erl +++ b/src/asciideck_parser.erl @@ -195,8 +195,13 @@ p1_ll_glob([{LN, <<"+">>}|Tail], Acc) -> p1_ll_glob(Tail, [{LN, <<>>}|Acc]); p1_ll_glob([{LN, <<" ", Line/bits>>}|Tail], Acc) -> p1_ll_glob([{LN, trim_ws(Line)}|Tail], Acc); -p1_ll_glob([Line|Tail], Acc) -> - p1_ll_glob(Tail, [Line|Acc]). +p1_ll_glob(Lines=[Line={LN, Text}|Tail], Acc) -> + case binary:split(<< Text/binary, $\s >>, <<":: ">>) of + [_, _] -> + {Lines, lists:reverse([{LN, <<>>}|Acc])}; + _ -> + p1_ll_glob(Tail, [Line|Acc]) + end. p1_text(Lines=[{LN, Line}|Tail], AST, St) -> case binary:split(<< Line/binary, $\s >>, <<":: ">>) of |