Fix makeSections so it doesn't turn column divs into sections.
commit4489283b03fecce31c49f37809932cebb8b72d46
authorJohn MacFarlane <jgm@berkeley.edu>
dateThu 5 Dec 2019, 09:17 (7 years ago)
parent28a2a6e
src/Text/Pandoc/Shared.hs+3−1
@@ -586,7 +586,9 @@ makeSections numbering mbBaseLevel bs =
586586 (Header level (ident,classes,kvs) title':ys) : xs)
587587 | all (\case
588588 Header level' _ _ -> level' > level
589− _ -> True) ys = do
589+ _ -> True) ys
590+ , "column" `notElem` dclasses
591+ , "columns" `notElem` dclasses = do
590592 inner <- go (Header level (ident,classes,kvs) title':ys)
591593 let inner' =
592594 case inner of
test/command/make-section-column-divs.mdnew file+28
@@ -0,0 +1,28 @@
1+For reference see
2+https://groups.google.com/d/msgid/pandoc-discuss/cef24253-7731-417c-a1ee-48153c4344bf%40googlegroups.com
3+
4+```
5+% pandoc
6+::: columns
7+::: column
8+# A
9+
10+a
11+:::
12+::: column
13+# B
14+
15+b
16+:::
17+:::
18+^D
19+<div class="columns">
20+<div class="column">
21+<h1 id="a">A</h1>
22+<p>a</p>
23+</div><div class="column">
24+<h1 id="b">B</h1>
25+<p>b</p>
26+</div>
27+</div>
28+```