diff options
Diffstat (limited to 'src/Text/Pandoc/Shared.hs')
| -rw-r--r-- | src/Text/Pandoc/Shared.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index 949f53a3a..4dc2484e7 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -544,7 +544,8 @@ hierarchicalizeWithIds (x:rest) = do headerLtEq :: Int -> Block -> Bool headerLtEq level (Header l _ _) = l <= level -headerLtEq level (Div ("",["references"],[]) (Header l _ _ : _)) = l <= level +headerLtEq level (Div ("",classes,[]) (Header l _ _ : _)) = + l <= level && "column" `notElem` classes && "columns" `notElem` classes headerLtEq _ _ = False -- | Generate a unique identifier from a list of inlines. |