simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-12-25 19:31:44 +03:00
Code Issues Projects Releases Wiki Activity

hakyll-std/TableOfContents: remove unused function removeTOCMarker

Browse Source
This commit is contained in:
Everett Hildenbrandt 2018-04-27 01:32:52 -06:00 committed by Simon Michael
parent 3d1c5359a3
commit 6b576a7e2d
1 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
site/hakyll-std/TableOfContents.hs
View File

@ -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