Ext_header_identifiers -> Ext_auto_identifiers.

2 files changed, 3 insertions, 3 deletions

diff --git a/src/Text/Pandoc/Options.hs b/src/Text/Pandoc/Options.hs
index f4ab0d2b4..e64e7afda 100644
--- a/src/Text/Pandoc/Options.hs
+++ b/src/Text/Pandoc/Options.hs
@@ -90,7 +90,7 @@ data Extension =
     | Ext_hard_line_breaks    -- ^ All newlines become hard line breaks
     | Ext_literate_haskell    -- ^ Enable literate Haskell conventions
     | Ext_abbreviations       -- ^ PHP markdown extra abbreviation definitions
-    | Ext_header_identifiers  -- ^ Automatic identifiers for headers
+    | Ext_auto_identifiers    -- ^ Automatic identifiers for headers
     | Ext_implicit_header_references -- ^ Implicit reference links for headers
     deriving (Show, Read, Enum, Eq, Ord, Bounded)
 
@@ -128,7 +128,7 @@ pandocExtensions = Set.fromList
   , Ext_strikeout
   , Ext_superscript
   , Ext_subscript
-  , Ext_header_identifiers
+  , Ext_auto_identifiers
   , Ext_implicit_header_references
   ]
 
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index c27ccf6fd..5ff196571 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -377,7 +377,7 @@ addToHeaderList :: F Inlines -> MarkdownParser String
 addToHeaderList text = do
   let headerList = B.toList $ runF text defaultParserState
   updateState $ \st -> st{ stateHeaders = headerList : stateHeaders st }
-  (do guardEnabled Ext_header_identifiers
+  (do guardEnabled Ext_auto_identifiers
       ids <- stateIdentifiers `fmap` getState
       let id' = uniqueIdent headerList ids
       updateState $ \st -> st{ stateIdentifiers = id' : ids }