git.iko.soy/typeable/pandoc
on master help sign in
Ext_header_identifiers -> Ext_auto_identifiers.
1a7686aJohn MacFarlane
src/Text/Pandoc/Options.hs+2−2
compare with master
unifiedsplit
@@ -90,7 +90,7 @@ data Extension =
90 | Ext_hard_line_breaks -- ^ All newlines become hard line breaks
90 | Ext_hard_line_breaks -- ^ All newlines become hard line breaks
91 | Ext_literate_haskell -- ^ Enable literate Haskell conventions
91 | Ext_literate_haskell -- ^ Enable literate Haskell conventions
92 | Ext_abbreviations -- ^ PHP markdown extra abbreviation definitions
92 | Ext_abbreviations -- ^ PHP markdown extra abbreviation definitions
93− | Ext_header_identifiers -- ^ Automatic identifiers for headers
93+ | Ext_auto_identifiers -- ^ Automatic identifiers for headers
94 | Ext_implicit_header_references -- ^ Implicit reference links for headers
94 | Ext_implicit_header_references -- ^ Implicit reference links for headers
95 deriving (Show, Read, Enum, Eq, Ord, Bounded)
95 deriving (Show, Read, Enum, Eq, Ord, Bounded)
96
96
@@ -128,7 +128,7 @@ pandocExtensions = Set.fromList
128 , Ext_strikeout
128 , Ext_strikeout
129 , Ext_superscript
129 , Ext_superscript
130 , Ext_subscript
130 , Ext_subscript
131− , Ext_header_identifiers
131+ , Ext_auto_identifiers
132 , Ext_implicit_header_references
132 , Ext_implicit_header_references
133 ]
133 ]
134
134
src/Text/Pandoc/Readers/Markdown.hs+1−1
@@ -377,7 +377,7 @@ addToHeaderList :: F Inlines -> MarkdownParser String
377addToHeaderList text = do
377addToHeaderList text = do
378 let headerList = B.toList $ runF text defaultParserState
378 let headerList = B.toList $ runF text defaultParserState
379 updateState $ \st -> st{ stateHeaders = headerList : stateHeaders st }
379 updateState $ \st -> st{ stateHeaders = headerList : stateHeaders st }
380− (do guardEnabled Ext_header_identifiers
380+ (do guardEnabled Ext_auto_identifiers
381 ids <- stateIdentifiers `fmap` getState
381 ids <- stateIdentifiers `fmap` getState
382 let id' = uniqueIdent headerList ids
382 let id' = uniqueIdent headerList ids
383 updateState $ \st -> st{ stateIdentifiers = id' : ids }
383 updateState $ \st -> st{ stateIdentifiers = id' : ids }