diff options
Diffstat (limited to 'src/Text/Pandoc/Shared.hs')
| -rw-r--r-- | src/Text/Pandoc/Shared.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index 926116e23..efb2e56dd 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -586,7 +586,9 @@ makeSections numbering mbBaseLevel bs = (Header level (ident,classes,kvs) title':ys) : xs) | all (\case Header level' _ _ -> level' > level - _ -> True) ys = do + _ -> True) ys + , "column" `notElem` dclasses + , "columns" `notElem` dclasses = do inner <- go (Header level (ident,classes,kvs) title':ys) let inner' = case inner of |