diff --git a/site/hakyll-std/TableOfContents.hs b/site/hakyll-std/TableOfContents.hs index af076deb2..6886aa1ed 100644 --- a/site/hakyll-std/TableOfContents.hs +++ b/site/hakyll-std/TableOfContents.hs @@ -7,7 +7,6 @@ module TableOfContents ( tableOfContents, ignoreTOC, collectHeaders, - removeTOCMarker ) where import Text.Pandoc @@ -38,10 +37,6 @@ ignoreTOC (Header level (ident, classes, params) inline) = Header level (ident, "notoc" : classes, params) inline ignoreTOC x = x -removeTOCMarker :: Block -> Block -removeTOCMarker (BulletList (( (( Plain ((Str "toc"):_)):_)):_)) = Null -removeTOCMarker x = x - collectHeaders :: Block -> [Block] collectHeaders header@(Header _ (_, classes, _) _) = if "notoc" `elem` classes