e10864d · typeable/pandoc

git.iko.soy/typeable/pandoc

Changed format of --list-extensions.

Now the + or - occurs first.

commite10864d9d59ac292fbf69031263931a8f6c9209a authorJohn MacFarlane <jgm@berkeley.edu> dateThu 28 Dec 2017, 12:12 (9 years ago) parent3494b6e

2 files changed+6−6

unifiedsplit

MANUAL.txt+3−2

@@ -389,9 +389,10 @@ General options

389389

390390`--list-extensions`[`=`*FORMAT*]

391391

392−: List supported Markdown extensions, one per line, followed

392+: List supported Markdown extensions, one per line, preceded

393393 by a `+` or `-` indicating whether it is enabled by default

394− in *FORMAT* (defaulting to pandoc's Markdown).

394+ in *FORMAT*. If *FORMAT* is not specified, defaults for

395+ pandoc's Markdown are given.

395396

396397`--list-highlight-languages`

397398

src/Text/Pandoc/App.hs+3−4

@@ -1592,10 +1592,9 @@ options =

15921592 (OptArg

15931593 (\arg _ -> do

15941594 let exts = getDefaultExtensions (fromMaybe "markdown" arg)

1595− let showExt x = drop 4 (show x) ++

1596− if extensionEnabled x exts

1597− then " +"

1598− else " -"

1595+ let showExt x = (if extensionEnabled x exts

1596+ then '+'

1597+ else '-') : drop 4 (show x)

15991598 mapM_ (UTF8.hPutStrLn stdout . showExt)

16001599 ([minBound..maxBound] :: [Extension])

16011600 exitSuccess )