@@ -134,7 +134,6 @@ data Opt = Opt
134134 , optDumpArgs :: Bool -- ^ Output command-line arguments
135135 , optIgnoreArgs :: Bool -- ^ Ignore command-line arguments
136136 , optStrict :: Bool -- ^ Use strict markdown syntax
137− , optExtensions :: [(Bool, Extension)]-- ^ Extensions to enable/disable
138137 , optReferenceLinks :: Bool -- ^ Use reference links in writing markdown, rst
139138 , optWrapText :: Bool -- ^ Wrap text
140139 , optColumns :: Int -- ^ Line length in characters
@@ -188,7 +187,6 @@ defaultOpts = Opt
188187 , optDumpArgs = False
189188 , optIgnoreArgs = False
190189 , optStrict = False
191− , optExtensions = []
192190 , optReferenceLinks = False
193191 , optWrapText = True
194192 , optColumns = 72
@@ -242,24 +240,6 @@ options =
242240 (\opt -> return opt { optStrict = True } ))
243241 "" -- "Disable markdown syntax extensions"
244242
245− , Option "e" ["enable"]
246− (ReqArg
247− (\arg opt -> do
248− ext <- readExtension arg
249− return opt { optExtensions =
250− (True,ext) : optExtensions opt } )
251− "EXTENSION")
252− "" -- "Enable specific markdown syntax extensions"
253−
254− , Option "d" ["disable"]
255− (ReqArg
256− (\arg opt -> do
257− ext <- readExtension arg
258− return opt { optExtensions =
259− (False,ext) : optExtensions opt } )
260− "EXTENSION")
261− "" -- "Disable specific markdown syntax extensions"
262−
263243 , Option "R" ["parse-raw"]
264244 (NoArg
265245 (\opt -> return opt { optParseRaw = True }))
@@ -840,7 +820,6 @@ main = do
840820 , optDumpArgs = dumpArgs
841821 , optIgnoreArgs = ignoreArgs
842822 , optStrict = strict
843− , optExtensions = exts
844823 , optReferenceLinks = referenceLinks
845824 , optWrapText = wrap
846825 , optColumns = columns
@@ -967,12 +946,7 @@ main = do
967946 then strictExtensions
968947 else pandocExtensions
969948
970− let extensions = foldl (\acc (inc,ext) -> if inc
971− then Set.insert ext acc
972− else Set.delete ext acc)
973− defaultExts exts
974−
975− let readerOpts = def{ readerExtensions = extensions
949+ let readerOpts = def{ readerExtensions = defaultExts
976950 , readerSmart = smart || (texLigatures &&
977951 (laTeXOutput || writerName' == "context"))
978952 , readerStandalone = standalone'
@@ -998,7 +972,7 @@ main = do
998972 writerIgnoreNotes = False,
999973 writerNumberSections = numberSections,
1000974 writerSectionDivs = sectionDivs,
1001− writerExtensions = extensions,
975+ writerExtensions = defaultExts,
1002976 writerReferenceLinks = referenceLinks,
1003977 writerWrapText = wrap,
1004978 writerColumns = columns,