7e389cb · typeable/pandoc

git.iko.soy/typeable/pandoc

on master help sign in

Use NoImplicitPrelude and explicitly import Prelude.

7e389cbJohn MacFarlane9 years ago

pandoc.hs+2

compare with master

unifiedsplit

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ Parses command-line options and calls the appropriate readers and

29writers.

30writers.

30-}

31-}

31module Main where

32module Main where

33+import Prelude

32import qualified Control.Exception as E

34import qualified Control.Exception as E

33import Text.Pandoc.App (convertWithOpts, defaultOpts, options, parseOptions)

35import Text.Pandoc.App (convertWithOpts, defaultOpts, options, parseOptions)

34import Text.Pandoc.Error (handleError)

36import Text.Pandoc.Error (handleError)

src/Text/Pandoc/App.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -42,6 +43,7 @@ module Text.Pandoc.App (

42 , options

43 , options

43 , applyFilters

44 , applyFilters

44 ) where

45 ) where

46+import Prelude

45import qualified Control.Exception as E

47import qualified Control.Exception as E

46import Control.Monad

48import Control.Monad

47import Control.Monad.Except (catchError, throwError)

49import Control.Monad.Except (catchError, throwError)

src/Text/Pandoc/Asciify.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -30,6 +31,7 @@ ascii equivalents (used in constructing HTML identifiers).

30-}

31-}

31module Text.Pandoc.Asciify (toAsciiChar)

32module Text.Pandoc.Asciify (toAsciiChar)

32where

33where

34+import Prelude

33import Data.Char (isAscii)

35import Data.Char (isAscii)

34import qualified Data.Map as M

36import qualified Data.Map as M

src/Text/Pandoc/BCP47.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -34,6 +35,7 @@ module Text.Pandoc.BCP47 (

34 , renderLang

35 , renderLang

35 )

36 )

36where

37where

38+import Prelude

37import Control.Monad (guard)

39import Control.Monad (guard)

38import Data.Char (isAlphaNum, isAscii, isLetter, isLower, isUpper, toLower,

40import Data.Char (isAlphaNum, isAscii, isLetter, isLower, isUpper, toLower,

39 toUpper)

41 toUpper)

src/Text/Pandoc/CSS.hs+2

@@ -1,9 +1,11 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Text.Pandoc.CSS ( foldOrElse

2module Text.Pandoc.CSS ( foldOrElse

2 , pickStyleAttrProps

3 , pickStyleAttrProps

3 , pickStylesToKVs

4 , pickStylesToKVs

4 )

5 )

5where

6where

8+import Prelude

7import Text.Pandoc.Shared (trim)

9import Text.Pandoc.Shared (trim)

8import Text.Parsec

10import Text.Parsec

9import Text.Parsec.String

11import Text.Parsec.String

src/Text/Pandoc/CSV.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -34,6 +35,7 @@ module Text.Pandoc.CSV (

34 ParseError

35 ParseError

35) where

36) where

38+import Prelude

37import Control.Monad (void)

39import Control.Monad (void)

38import Data.Text (Text)

40import Data.Text (Text)

39import qualified Data.Text as T

41import qualified Data.Text as T

src/Text/Pandoc/Class.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE DeriveFunctor #-}

4{-# LANGUAGE DeriveFunctor #-}

@@ -96,6 +97,7 @@ module Text.Pandoc.Class ( PandocMonad(..)

96 , Translations

97 , Translations

97 ) where

98 ) where

100+import Prelude

99import Prelude hiding (readFile)

101import Prelude hiding (readFile)

100import System.Random (StdGen, next, mkStdGen)

102import System.Random (StdGen, next, mkStdGen)

101import qualified System.Random as IO (newStdGen)

103import qualified System.Random as IO (newStdGen)

src/Text/Pandoc/Data.hs+2

@@ -1,7 +1,9 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE TemplateHaskell #-}

2{-# LANGUAGE TemplateHaskell #-}

3module Text.Pandoc.Data (dataFiles) where

4module Text.Pandoc.Data (dataFiles) where

6+import Prelude

5import qualified Data.ByteString as B

7import qualified Data.ByteString as B

6import Data.FileEmbed

8import Data.FileEmbed

7import System.FilePath (splitDirectories)

9import System.FilePath (splitDirectories)

src/Text/Pandoc/Emoji.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -28,6 +29,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

28Emoji symbol lookup from canonical string identifier.

29Emoji symbol lookup from canonical string identifier.

29-}

30-}

30module Text.Pandoc.Emoji ( emojis ) where

31module Text.Pandoc.Emoji ( emojis ) where

32+import Prelude

31import qualified Data.Map as M

33import qualified Data.Map as M

33emojis :: M.Map String String

35emojis :: M.Map String String

src/Text/Pandoc/Error.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE DeriveGeneric #-}

3{-

4{-

@@ -34,6 +35,7 @@ module Text.Pandoc.Error (

34 PandocError(..),

35 PandocError(..),

35 handleError) where

36 handleError) where

38+import Prelude

37import Control.Exception (Exception)

39import Control.Exception (Exception)

38import Data.Typeable (Typeable)

40import Data.Typeable (Typeable)

39import GHC.Generics (Generic)

41import GHC.Generics (Generic)

src/Text/Pandoc/Extensions.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE DeriveDataTypeable #-}

3{-# LANGUAGE DeriveDataTypeable #-}

3{-# LANGUAGE DeriveGeneric #-}

4{-# LANGUAGE DeriveGeneric #-}

@@ -48,6 +49,7 @@ module Text.Pandoc.Extensions ( Extension(..)

48 , githubMarkdownExtensions

49 , githubMarkdownExtensions

49 , multimarkdownExtensions )

50 , multimarkdownExtensions )

50where

51where

52+import Prelude

51import Data.Aeson (FromJSON (..), ToJSON (..), defaultOptions)

53import Data.Aeson (FromJSON (..), ToJSON (..), defaultOptions)

52import Data.Aeson.TH (deriveJSON)

54import Data.Aeson.TH (deriveJSON)

53import Data.Bits (clearBit, setBit, testBit, (.|.))

55import Data.Bits (clearBit, setBit, testBit, (.|.))

src/Text/Pandoc/Filter.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -33,6 +34,7 @@ module Text.Pandoc.Filter

33 , applyFilters

34 , applyFilters

34 ) where

35 ) where

37+import Prelude

36import Data.Aeson (defaultOptions)

38import Data.Aeson (defaultOptions)

37import Data.Aeson.TH (deriveJSON)

39import Data.Aeson.TH (deriveJSON)

38import Data.Foldable (foldrM)

40import Data.Foldable (foldrM)

src/Text/Pandoc/Filter/JSON.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ Programmatically modifications of pandoc documents via JSON filters.

29-}

30-}

30module Text.Pandoc.Filter.JSON (apply) where

31module Text.Pandoc.Filter.JSON (apply) where

33+import Prelude

32import Control.Monad (unless, when)

34import Control.Monad (unless, when)

33import Control.Monad.Trans (MonadIO (liftIO))

35import Control.Monad.Trans (MonadIO (liftIO))

34import Data.Aeson (eitherDecode', encode)

36import Data.Aeson (eitherDecode', encode)

src/Text/Pandoc/Filter/Lua.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ Apply Lua filters to modify a pandoc documents programmatically.

29-}

30-}

30module Text.Pandoc.Filter.Lua (apply) where

31module Text.Pandoc.Filter.Lua (apply) where

33+import Prelude

32import Control.Exception (throw)

34import Control.Exception (throw)

33import Text.Pandoc.Class (PandocIO)

35import Text.Pandoc.Class (PandocIO)

34import Text.Pandoc.Definition (Pandoc)

36import Text.Pandoc.Definition (Pandoc)

src/Text/Pandoc/Filter/Path.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ module Text.Pandoc.Filter.Path

31 ( expandFilterPath

32 ( expandFilterPath

32 ) where

33 ) where

35+import Prelude

34import Text.Pandoc.Class (PandocMonad, fileExists, getUserDataDir)

36import Text.Pandoc.Class (PandocMonad, fileExists, getUserDataDir)

35import System.FilePath ((</>), isRelative)

37import System.FilePath ((</>), isRelative)

src/Text/Pandoc/Highlighting.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -49,6 +50,7 @@ module Text.Pandoc.Highlighting ( highlightingStyles

49 , fromListingsLanguage

50 , fromListingsLanguage

50 , toListingsLanguage

51 , toListingsLanguage

51 ) where

52 ) where

53+import Prelude

52import Control.Monad

54import Control.Monad

53import Data.Char (toLower)

55import Data.Char (toLower)

54import qualified Data.Map as M

56import qualified Data.Map as M

src/Text/Pandoc/ImageSize.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings, ScopedTypeVariables, CPP #-}

2{-# LANGUAGE OverloadedStrings, ScopedTypeVariables, CPP #-}

2{-# OPTIONS_GHC -fno-warn-type-defaults #-}

3{-# OPTIONS_GHC -fno-warn-type-defaults #-}

3{-

4{-

@@ -49,6 +50,7 @@ module Text.Pandoc.ImageSize ( ImageType(..)

49 , showInPixel

50 , showInPixel

50 , showFl

51 , showFl

51 ) where

52 ) where

53+import Prelude

52import Data.ByteString (ByteString, unpack)

54import Data.ByteString (ByteString, unpack)

53import qualified Data.ByteString.Char8 as B

55import qualified Data.ByteString.Char8 as B

54import qualified Data.ByteString.Lazy as BL

56import qualified Data.ByteString.Lazy as BL

src/Text/Pandoc/Logging.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

@@ -39,6 +40,7 @@ module Text.Pandoc.Logging (

39 , messageVerbosity

40 , messageVerbosity

40 ) where

41 ) where

43+import Prelude

42import Control.Monad (mzero)

44import Control.Monad (mzero)

43import Data.Aeson

45import Data.Aeson

44import Data.Aeson.Encode.Pretty (Config (..), defConfig, encodePretty',

46import Data.Aeson.Encode.Pretty (Config (..), defConfig, encodePretty',

src/Text/Pandoc/Lua.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ module Text.Pandoc.Lua

31 , runPandocLua

32 , runPandocLua

32 ) where

33 ) where

35+import Prelude

34import Control.Monad ((>=>))

36import Control.Monad ((>=>))

35import Foreign.Lua (FromLuaStack (peek), Lua, LuaException (..),

37import Foreign.Lua (FromLuaStack (peek), Lua, LuaException (..),

36 Status (OK), ToLuaStack (push))

38 Status (OK), ToLuaStack (push))

src/Text/Pandoc/Lua/Filter.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

3module Text.Pandoc.Lua.Filter ( LuaFilterFunction

4module Text.Pandoc.Lua.Filter ( LuaFilterFunction

@@ -10,6 +11,7 @@ module Text.Pandoc.Lua.Filter ( LuaFilterFunction

10 , blockElementNames

11 , blockElementNames

11 , inlineElementNames

12 , inlineElementNames

12 ) where

13 ) where

14+import Prelude

13import Control.Monad (mplus, unless, when, (>=>))

15import Control.Monad (mplus, unless, when, (>=>))

14import Control.Monad.Catch (finally)

16import Control.Monad.Catch (finally)

15import Text.Pandoc.Definition

17import Text.Pandoc.Definition

src/Text/Pandoc/Lua/Init.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -34,6 +35,7 @@ module Text.Pandoc.Lua.Init

34 , registerScriptPath

35 , registerScriptPath

35 ) where

36 ) where

38+import Prelude

37import Control.Monad.Trans (MonadIO (..))

39import Control.Monad.Trans (MonadIO (..))

38import Data.Data (Data, dataTypeConstrs, dataTypeOf, showConstr)

40import Data.Data (Data, dataTypeConstrs, dataTypeOf, showConstr)

39import Data.IORef (newIORef, readIORef)

41import Data.IORef (newIORef, readIORef)

src/Text/Pandoc/Lua/Module/MediaBag.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ module Text.Pandoc.Lua.Module.MediaBag

29 ( pushModule

30 ( pushModule

30 ) where

31 ) where

33+import Prelude

32import Control.Monad (zipWithM_)

34import Control.Monad (zipWithM_)

33import Data.IORef (IORef, modifyIORef', readIORef)

35import Data.IORef (IORef, modifyIORef', readIORef)

34import Data.Maybe (fromMaybe)

36import Data.Maybe (fromMaybe)

src/Text/Pandoc/Lua/Module/Pandoc.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -30,6 +31,7 @@ module Text.Pandoc.Lua.Module.Pandoc

30 ( pushModule

31 ( pushModule

31 ) where

32 ) where

34+import Prelude

33import Control.Monad (when)

35import Control.Monad (when)

34import Data.Default (Default (..))

36import Data.Default (Default (..))

35import Data.Maybe (fromMaybe)

37import Data.Maybe (fromMaybe)

src/Text/Pandoc/Lua/Module/Utils.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ module Text.Pandoc.Lua.Module.Utils

29 ( pushModule

30 ( pushModule

30 ) where

31 ) where

33+import Prelude

32import Control.Applicative ((<|>))

34import Control.Applicative ((<|>))

33import Data.Default (def)

35import Data.Default (def)

34import Foreign.Lua (FromLuaStack, Lua, LuaInteger, NumResults)

36import Foreign.Lua (FromLuaStack, Lua, LuaInteger, NumResults)

src/Text/Pandoc/Lua/Packages.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -32,6 +33,7 @@ module Text.Pandoc.Lua.Packages

32 , installPandocPackageSearcher

33 , installPandocPackageSearcher

33 ) where

34 ) where

36+import Prelude

35import Control.Monad (forM_)

37import Control.Monad (forM_)

36import Data.ByteString.Char8 (unpack)

38import Data.ByteString.Char8 (unpack)

37import Data.IORef (IORef)

39import Data.IORef (IORef)

src/Text/Pandoc/Lua/StackInstances.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

3 2017-2018 Albert Krewinkel <tarleb+pandoc@moltkeplatz.de>

4 2017-2018 Albert Krewinkel <tarleb+pandoc@moltkeplatz.de>

@@ -33,6 +34,7 @@ StackValue instances for pandoc types.

33-}

34-}

34module Text.Pandoc.Lua.StackInstances () where

35module Text.Pandoc.Lua.StackInstances () where

37+import Prelude

36import Control.Applicative ((<|>))

38import Control.Applicative ((<|>))

37import Control.Monad (when)

39import Control.Monad (when)

38import Control.Monad.Catch (finally)

40import Control.Monad.Catch (finally)

src/Text/Pandoc/Lua/Util.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

3 2017-2018 Albert Krewinkel <tarleb+pandoc@moltkeplatz.de>

4 2017-2018 Albert Krewinkel <tarleb+pandoc@moltkeplatz.de>

@@ -46,6 +47,7 @@ module Text.Pandoc.Lua.Util

46 , dostring'

47 , dostring'

47 ) where

48 ) where

50+import Prelude

49import Control.Monad (when)

51import Control.Monad (when)

50import Control.Monad.Catch (finally)

52import Control.Monad.Catch (finally)

51import Data.ByteString.Char8 (unpack)

53import Data.ByteString.Char8 (unpack)

src/Text/Pandoc/MIME.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ Mime type lookup for ODT writer.

29-}

30-}

30module Text.Pandoc.MIME ( MimeType, getMimeType, getMimeTypeDef,

31module Text.Pandoc.MIME ( MimeType, getMimeType, getMimeTypeDef,

31 extensionFromMimeType )where

32 extensionFromMimeType )where

33+import Prelude

32import Data.Char (toLower)

34import Data.Char (toLower)

33import Data.List (isPrefixOf, isSuffixOf)

35import Data.List (isPrefixOf, isSuffixOf)

34import qualified Data.Map as M

36import qualified Data.Map as M

src/Text/Pandoc/MediaBag.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE DeriveDataTypeable #-}

3{-# LANGUAGE DeriveDataTypeable #-}

3{-# LANGUAGE GeneralizedNewtypeDeriving #-}

4{-# LANGUAGE GeneralizedNewtypeDeriving #-}

@@ -37,6 +38,7 @@ module Text.Pandoc.MediaBag (

37 insertMedia,

38 insertMedia,

38 mediaDirectory,

39 mediaDirectory,

39 ) where

40 ) where

41+import Prelude

40import qualified Data.ByteString.Lazy as BL

42import qualified Data.ByteString.Lazy as BL

41import Data.Data (Data)

43import Data.Data (Data)

42import qualified Data.Map as M

44import qualified Data.Map as M

src/Text/Pandoc/Options.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE TemplateHaskell #-}

4{-# LANGUAGE TemplateHaskell #-}

@@ -46,6 +47,7 @@ module Text.Pandoc.Options ( module Text.Pandoc.Extensions

46 , def

47 , def

47 , isEnabled

48 , isEnabled

48 ) where

49 ) where

50+import Prelude

49import Data.Aeson (defaultOptions)

51import Data.Aeson (defaultOptions)

50import Data.Aeson.TH (deriveJSON)

52import Data.Aeson.TH (deriveJSON)

51import Data.Data (Data)

53import Data.Data (Data)

src/Text/Pandoc/PDF.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -32,6 +33,7 @@ Conversion of LaTeX documents to PDF.

32-}

33-}

33module Text.Pandoc.PDF ( makePDF ) where

34module Text.Pandoc.PDF ( makePDF ) where

36+import Prelude

35import qualified Codec.Picture as JP

37import qualified Codec.Picture as JP

36import qualified Control.Exception as E

38import qualified Control.Exception as E

37import Control.Monad (unless, when)

39import Control.Monad (unless, when)

src/Text/Pandoc/Parsing.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE ExplicitForAll #-}

3{-# LANGUAGE ExplicitForAll #-}

3{-# LANGUAGE FlexibleContexts #-}

4{-# LANGUAGE FlexibleContexts #-}

@@ -195,6 +196,7 @@ module Text.Pandoc.Parsing ( takeWhileP,

195 )

196 )

196where

197where

197

198

199+import Prelude

198import Control.Monad.Identity

200import Control.Monad.Identity

199import Control.Monad.Reader

201import Control.Monad.Reader

200import Data.Char (chr, isAlphaNum, isAscii, isAsciiUpper, isHexDigit,

202import Data.Char (chr, isAlphaNum, isAscii, isAsciiUpper, isHexDigit,

src/Text/Pandoc/Pretty.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE GeneralizedNewtypeDeriving #-}

3{-# LANGUAGE GeneralizedNewtypeDeriving #-}

3{-

4{-

@@ -77,6 +78,7 @@ module Text.Pandoc.Pretty (

77 )

78 )

79where

80where

81+import Prelude

80import Control.Monad

82import Control.Monad

81import Control.Monad.State.Strict

83import Control.Monad.State.Strict

82import Data.Char (isSpace)

84import Data.Char (isSpace)

src/Text/Pandoc/Process.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ ByteString variant of 'readProcessWithExitCode'.

29-}

30-}

30module Text.Pandoc.Process (pipeProcess)

31module Text.Pandoc.Process (pipeProcess)

31where

32where

33+import Prelude

32import Control.Concurrent (forkIO, newEmptyMVar, putMVar, takeMVar)

34import Control.Concurrent (forkIO, newEmptyMVar, putMVar, takeMVar)

33import Control.Exception

35import Control.Exception

34import Control.Monad (unless)

36import Control.Monad (unless)

src/Text/Pandoc/Readers.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE GADTs #-}

3{-# LANGUAGE GADTs #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -69,6 +70,7 @@ module Text.Pandoc.Readers

69 , getDefaultExtensions

70 , getDefaultExtensions

70 ) where

71 ) where

73+import Prelude

72import Control.Monad.Except (throwError)

74import Control.Monad.Except (throwError)

73import Data.Aeson

75import Data.Aeson

74import qualified Data.ByteString.Lazy as BL

76import qualified Data.ByteString.Lazy as BL

src/Text/Pandoc/Readers/CommonMark.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -32,6 +33,7 @@ CommonMark is a strongly specified variant of Markdown: http://commonmark.org.

32module Text.Pandoc.Readers.CommonMark (readCommonMark)

33module Text.Pandoc.Readers.CommonMark (readCommonMark)

33where

34where

36+import Prelude

35import CMarkGFM

37import CMarkGFM

36import Control.Monad.State

38import Control.Monad.State

37import Data.Char (isAlphaNum, isLetter, isSpace, toLower)

39import Data.Char (isAlphaNum, isLetter, isSpace, toLower)

src/Text/Pandoc/Readers/Creole.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -35,6 +36,7 @@ Conversion of creole text to 'Pandoc' document.

35module Text.Pandoc.Readers.Creole ( readCreole

36module Text.Pandoc.Readers.Creole ( readCreole

36 ) where

37 ) where

39+import Prelude

38import Control.Monad.Except (guard, liftM2, throwError)

40import Control.Monad.Except (guard, liftM2, throwError)

39import qualified Data.Foldable as F

41import qualified Data.Foldable as F

40import Data.Maybe (fromMaybe)

42import Data.Maybe (fromMaybe)

src/Text/Pandoc/Readers/DocBook.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE ExplicitForAll #-}

2{-# LANGUAGE ExplicitForAll #-}

2module Text.Pandoc.Readers.DocBook ( readDocBook ) where

3module Text.Pandoc.Readers.DocBook ( readDocBook ) where

4+import Prelude

3import Control.Monad.State.Strict

5import Control.Monad.State.Strict

4import Data.Char (isSpace, toUpper)

6import Data.Char (isSpace, toUpper)

5import Data.Default

7import Data.Default

src/Text/Pandoc/Readers/Docx.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE PatternGuards #-}

4{-# LANGUAGE PatternGuards #-}

@@ -74,6 +75,7 @@ module Text.Pandoc.Readers.Docx

74 ( readDocx

75 ( readDocx

75 ) where

76 ) where

78+import Prelude

77import Codec.Archive.Zip

79import Codec.Archive.Zip

78import Control.Monad.Reader

80import Control.Monad.Reader

79import Control.Monad.State.Strict

81import Control.Monad.State.Strict

src/Text/Pandoc/Readers/Docx/Combine.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE TypeSynonymInstances #-}

4{-# LANGUAGE TypeSynonymInstances #-}

@@ -7,6 +8,7 @@ module Text.Pandoc.Readers.Docx.Combine ( smushInlines

7 )

8 )

8 where

9 where

11+import Prelude

10import Data.List

12import Data.List

11import Data.Sequence (ViewL (..), ViewR (..), viewl, viewr, (><), (|>))

13import Data.Sequence (ViewL (..), ViewR (..), viewl, viewr, (><), (|>))

12import qualified Data.Sequence as Seq (null)

14import qualified Data.Sequence as Seq (null)

src/Text/Pandoc/Readers/Docx/Fields.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -32,6 +33,7 @@ module Text.Pandoc.Readers.Docx.Fields ( FieldInfo(..)

32 , parseFieldInfo

33 , parseFieldInfo

33 ) where

34 ) where

36+import Prelude

35import Text.Parsec

37import Text.Parsec

36import Text.Parsec.String (Parser)

38import Text.Parsec.String (Parser)

src/Text/Pandoc/Readers/Docx/Lists.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -33,6 +34,7 @@ module Text.Pandoc.Readers.Docx.Lists ( blocksToBullets

33 , listParagraphDivs

34 , listParagraphDivs

34 ) where

35 ) where

37+import Prelude

36import Data.List

38import Data.List

37import Data.Maybe

39import Data.Maybe

38import Text.Pandoc.Generic (bottomUp)

40import Text.Pandoc.Generic (bottomUp)

src/Text/Pandoc/Readers/Docx/Parse.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE ViewPatterns #-}

4{-# LANGUAGE ViewPatterns #-}

@@ -58,6 +59,7 @@ module Text.Pandoc.Readers.Docx.Parse ( Docx(..)

58 , archiveToDocx

59 , archiveToDocx

59 , archiveToDocxWithWarnings

60 , archiveToDocxWithWarnings

60 ) where

61 ) where

62+import Prelude

61import Codec.Archive.Zip

63import Codec.Archive.Zip

62import Control.Applicative ((<|>))

64import Control.Applicative ((<|>))

63import Control.Monad.Except

65import Control.Monad.Except

src/Text/Pandoc/Readers/Docx/StyleMap.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Text.Pandoc.Readers.Docx.StyleMap ( StyleMaps(..)

2module Text.Pandoc.Readers.Docx.StyleMap ( StyleMaps(..)

2 , alterMap

3 , alterMap

3 , getMap

4 , getMap

@@ -7,6 +8,7 @@ module Text.Pandoc.Readers.Docx.StyleMap ( StyleMaps(..)

7 , hasStyleName

8 , hasStyleName

8 ) where

9 ) where

11+import Prelude

10import Control.Monad.State.Strict

12import Control.Monad.State.Strict

11import Data.Char (toLower)

13import Data.Char (toLower)

12import qualified Data.Map as M

14import qualified Data.Map as M

src/Text/Pandoc/Readers/Docx/Util.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Text.Pandoc.Readers.Docx.Util (

2module Text.Pandoc.Readers.Docx.Util (

2 NameSpaces

3 NameSpaces

3 , elemName

4 , elemName

@@ -8,6 +9,7 @@ module Text.Pandoc.Readers.Docx.Util (

8 , findAttrByName

9 , findAttrByName

9 ) where

10 ) where

12+import Prelude

11import Data.Maybe (mapMaybe)

13import Data.Maybe (mapMaybe)

12import Text.XML.Light

14import Text.XML.Light

src/Text/Pandoc/Readers/EPUB.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

3{-# LANGUAGE TupleSections #-}

4{-# LANGUAGE TupleSections #-}

@@ -7,6 +8,7 @@ module Text.Pandoc.Readers.EPUB

7 (readEPUB)

8 (readEPUB)

8 where

9 where

11+import Prelude

10import Codec.Archive.Zip (Archive (..), Entry, findEntryByPath, fromEntry,

12import Codec.Archive.Zip (Archive (..), Entry, findEntryByPath, fromEntry,

11 toArchiveOrFail)

13 toArchiveOrFail)

12import Control.DeepSeq (NFData, deepseq)

14import Control.DeepSeq (NFData, deepseq)

src/Text/Pandoc/Readers/HTML.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE MultiParamTypeClasses #-}

4{-# LANGUAGE MultiParamTypeClasses #-}

@@ -42,6 +43,7 @@ module Text.Pandoc.Readers.HTML ( readHtml

42 , isCommentTag

43 , isCommentTag

43 ) where

44 ) where

46+import Prelude

45import Control.Applicative ((<|>))

47import Control.Applicative ((<|>))

46import Control.Arrow (first)

48import Control.Arrow (first)

47import Control.Monad (guard, mplus, msum, mzero, unless, void)

49import Control.Monad (guard, mplus, msum, mzero, unless, void)

src/Text/Pandoc/Readers/Haddock.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{- |

3{- |

3 Module : Text.Pandoc.Readers.Haddock

4 Module : Text.Pandoc.Readers.Haddock

@@ -14,6 +15,7 @@ module Text.Pandoc.Readers.Haddock

14 ( readHaddock

15 ( readHaddock

15 ) where

16 ) where

18+import Prelude

17import Control.Monad.Except (throwError)

19import Control.Monad.Except (throwError)

18import Data.List (intersperse, stripPrefix)

20import Data.List (intersperse, stripPrefix)

19import Data.Maybe (fromMaybe)

21import Data.Maybe (fromMaybe)

src/Text/Pandoc/Readers/JATS.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE ExplicitForAll, TupleSections #-}

2{-# LANGUAGE ExplicitForAll, TupleSections #-}

2module Text.Pandoc.Readers.JATS ( readJATS ) where

3module Text.Pandoc.Readers.JATS ( readJATS ) where

4+import Prelude

3import Control.Monad.State.Strict

5import Control.Monad.State.Strict

4import Data.Char (isDigit, isSpace, toUpper)

6import Data.Char (isDigit, isSpace, toUpper)

5import Data.Default

7import Data.Default

src/Text/Pandoc/Readers/LaTeX.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE MultiParamTypeClasses #-}

3{-# LANGUAGE MultiParamTypeClasses #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

@@ -42,6 +43,7 @@ module Text.Pandoc.Readers.LaTeX ( readLaTeX,

42 untokenize

43 untokenize

43 ) where

44 ) where

46+import Prelude

45import Control.Applicative (many, optional, (<|>))

47import Control.Applicative (many, optional, (<|>))

46import Control.Monad

48import Control.Monad

47import Control.Monad.Except (throwError)

49import Control.Monad.Except (throwError)

src/Text/Pandoc/Readers/LaTeX/Types.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -34,6 +35,7 @@ module Text.Pandoc.Readers.LaTeX.Types ( Tok(..)

34 , SourcePos

35 , SourcePos

35 )

36 )

36where

37where

38+import Prelude

37import Data.Text (Text)

39import Data.Text (Text)

38import Text.Parsec.Pos (SourcePos)

40import Text.Parsec.Pos (SourcePos)

src/Text/Pandoc/Readers/Markdown.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE RelaxedPolyRec #-}

2{-# LANGUAGE RelaxedPolyRec #-}

2{-# LANGUAGE ScopedTypeVariables #-}

3{-# LANGUAGE ScopedTypeVariables #-}

@@ -32,6 +33,7 @@ Conversion of markdown-formatted plain text to 'Pandoc' document.

32-}

33-}

33module Text.Pandoc.Readers.Markdown ( readMarkdown ) where

34module Text.Pandoc.Readers.Markdown ( readMarkdown ) where

36+import Prelude

35import Control.Monad

37import Control.Monad

36import Control.Monad.Except (throwError)

38import Control.Monad.Except (throwError)

37import Data.Char (isAlphaNum, isPunctuation, isSpace, toLower)

39import Data.Char (isAlphaNum, isPunctuation, isSpace, toLower)

src/Text/Pandoc/Readers/MediaWiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE RelaxedPolyRec #-}

3{-# LANGUAGE RelaxedPolyRec #-}

3{-# LANGUAGE TypeSynonymInstances #-}

4{-# LANGUAGE TypeSynonymInstances #-}

@@ -38,6 +39,7 @@ _ parse templates?

38-}

39-}

39module Text.Pandoc.Readers.MediaWiki ( readMediaWiki ) where

40module Text.Pandoc.Readers.MediaWiki ( readMediaWiki ) where

42+import Prelude

41import Control.Monad

43import Control.Monad

42import Control.Monad.Except (throwError)

44import Control.Monad.Except (throwError)

43import Data.Char (isDigit, isSpace)

45import Data.Char (isDigit, isSpace)

src/Text/Pandoc/Readers/Muse.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-

3{-

@@ -39,6 +40,7 @@ TODO:

39-}

40-}

40module Text.Pandoc.Readers.Muse (readMuse) where

41module Text.Pandoc.Readers.Muse (readMuse) where

43+import Prelude

42import Control.Monad

44import Control.Monad

43import Control.Monad.Except (throwError)

45import Control.Monad.Except (throwError)

44import Data.Char (isLetter)

46import Data.Char (isLetter)

src/Text/Pandoc/Readers/Native.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -30,6 +31,7 @@ Conversion of a string representation of a pandoc type (@Pandoc@,

30-}

31-}

31module Text.Pandoc.Readers.Native ( readNative ) where

32module Text.Pandoc.Readers.Native ( readNative ) where

34+import Prelude

33import Text.Pandoc.Definition

35import Text.Pandoc.Definition

34import Text.Pandoc.Options (ReaderOptions)

36import Text.Pandoc.Options (ReaderOptions)

35import Text.Pandoc.Shared (safeRead)

37import Text.Pandoc.Shared (safeRead)

src/Text/Pandoc/Readers/OPML.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2module Text.Pandoc.Readers.OPML ( readOPML ) where

3module Text.Pandoc.Readers.OPML ( readOPML ) where

4+import Prelude

3import Control.Monad.State.Strict

5import Control.Monad.State.Strict

4import Data.Char (toUpper)

6import Data.Char (toUpper)

5import Data.Default

7import Data.Default

src/Text/Pandoc/Readers/Odt.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE PatternGuards #-}

3{-

4{-

@@ -32,6 +33,7 @@ Entry point to the odt reader.

33module Text.Pandoc.Readers.Odt ( readOdt ) where

34module Text.Pandoc.Readers.Odt ( readOdt ) where

36+import Prelude

35import Codec.Archive.Zip

37import Codec.Archive.Zip

36import qualified Text.XML.Light as XML

38import qualified Text.XML.Light as XML

src/Text/Pandoc/Readers/Odt/Arrows/State.hs+2−2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE TupleSections #-}

3{-# LANGUAGE TupleSections #-}

3{-

4{-

@@ -37,14 +38,13 @@ faster and easier to implement this way.

38module Text.Pandoc.Readers.Odt.Arrows.State where

39module Text.Pandoc.Readers.Odt.Arrows.State where

41+import Prelude

40import Prelude hiding (foldl, foldr)

42import Prelude hiding (foldl, foldr)

42import Control.Arrow

44import Control.Arrow

43import qualified Control.Category as Cat

45import qualified Control.Category as Cat

44import Control.Monad

46import Control.Monad

46−import Data.Foldable

47−

48import Text.Pandoc.Readers.Odt.Arrows.Utils

49import Text.Pandoc.Readers.Odt.Generic.Fallible

src/Text/Pandoc/Readers/Odt/Arrows/Utils.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -39,6 +40,7 @@ with an equivalent return value.

39-- We export everything

40-- We export everything

40module Text.Pandoc.Readers.Odt.Arrows.Utils where

41module Text.Pandoc.Readers.Odt.Arrows.Utils where

43+import Prelude

42import Control.Arrow

44import Control.Arrow

43import Control.Monad (join)

45import Control.Monad (join)

src/Text/Pandoc/Readers/Odt/Base.hs−2

@@ -1,5 +1,3 @@

1−

2−

3{-

1{-

src/Text/Pandoc/Readers/Odt/ContentReader.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE Arrows #-}

2{-# LANGUAGE Arrows #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE RecordWildCards #-}

4{-# LANGUAGE RecordWildCards #-}

@@ -39,6 +40,7 @@ module Text.Pandoc.Readers.Odt.ContentReader

39, read_body

40, read_body

40) where

41) where

43+import Prelude

42import Control.Applicative hiding (liftA, liftA2, liftA3)

44import Control.Applicative hiding (liftA, liftA2, liftA3)

43import Control.Arrow

45import Control.Arrow

src/Text/Pandoc/Readers/Odt/Generic/Fallible.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

3{-

4{-

@@ -38,6 +39,7 @@ compatible instances of "ArrowChoice".

39-- We export everything

40-- We export everything

40module Text.Pandoc.Readers.Odt.Generic.Fallible where

41module Text.Pandoc.Readers.Odt.Generic.Fallible where

42+import Prelude

42-- | Default for now. Will probably become a class at some point.

44-- | Default for now. Will probably become a class at some point.

43type Failure = ()

45type Failure = ()

src/Text/Pandoc/Readers/Odt/Generic/Namespaces.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ typesafe Haskell namespace identifiers and unsafe "real world" namespaces.

32module Text.Pandoc.Readers.Odt.Generic.Namespaces where

33module Text.Pandoc.Readers.Odt.Generic.Namespaces where

35+import Prelude

34import qualified Data.Map as M

36import qualified Data.Map as M

36--

38--

src/Text/Pandoc/Readers/Odt/Generic/SetMap.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -30,6 +31,7 @@ A map of values to sets of values.

31module Text.Pandoc.Readers.Odt.Generic.SetMap where

32module Text.Pandoc.Readers.Odt.Generic.SetMap where

34+import Prelude

33import qualified Data.Map as M

35import qualified Data.Map as M

34import qualified Data.Set as S

36import qualified Data.Set as S

src/Text/Pandoc/Readers/Odt/Generic/Utils.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

3{-# LANGUAGE TypeOperators #-}

4{-# LANGUAGE TypeOperators #-}

@@ -51,6 +52,7 @@ module Text.Pandoc.Readers.Odt.Generic.Utils

51, composition

52, composition

52) where

53) where

55+import Prelude

54import Control.Category (Category, (<<<), (>>>))

56import Control.Category (Category, (<<<), (>>>))

55import qualified Control.Category as Cat (id)

57import qualified Control.Category as Cat (id)

56import Control.Monad (msum)

58import Control.Monad (msum)

src/Text/Pandoc/Readers/Odt/Generic/XMLConverter.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE Arrows #-}

2{-# LANGUAGE Arrows #-}

2{-# LANGUAGE TupleSections #-}

3{-# LANGUAGE TupleSections #-}

3{-# LANGUAGE GADTs #-}

4{-# LANGUAGE GADTs #-}

@@ -67,6 +68,7 @@ module Text.Pandoc.Readers.Odt.Generic.XMLConverter

67, matchContent

68, matchContent

68) where

69) where

71+import Prelude

70import Control.Applicative hiding ( liftA, liftA2 )

72import Control.Applicative hiding ( liftA, liftA2 )

71import Control.Monad ( MonadPlus )

73import Control.Monad ( MonadPlus )

72import Control.Arrow

74import Control.Arrow

src/Text/Pandoc/Readers/Odt/Namespaces.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ Namespaces used in odt files.

31module Text.Pandoc.Readers.Odt.Namespaces ( Namespace (..)

32module Text.Pandoc.Readers.Odt.Namespaces ( Namespace (..)

32 ) where

33 ) where

35+import Prelude

34import Data.List (isPrefixOf)

36import Data.List (isPrefixOf)

35import qualified Data.Map as M (empty, insert)

37import qualified Data.Map as M (empty, insert)

36import Data.Maybe (fromMaybe, listToMaybe)

38import Data.Maybe (fromMaybe, listToMaybe)

src/Text/Pandoc/Readers/Odt/StyleReader.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE Arrows #-}

3{-# LANGUAGE Arrows #-}

3{-# LANGUAGE RecordWildCards #-}

4{-# LANGUAGE RecordWildCards #-}

@@ -57,6 +58,7 @@ module Text.Pandoc.Readers.Odt.StyleReader

57, readStylesAt

58, readStylesAt

58) where

59) where

61+import Prelude

60import Control.Applicative hiding (liftA, liftA2, liftA3)

62import Control.Applicative hiding (liftA, liftA2, liftA3)

61import Control.Arrow

63import Control.Arrow

src/Text/Pandoc/Readers/Org.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -27,6 +28,7 @@ Conversion of org-mode formatted plain text to 'Pandoc' document.

27-}

28-}

28module Text.Pandoc.Readers.Org ( readOrg ) where

29module Text.Pandoc.Readers.Org ( readOrg ) where

31+import Prelude

30import Text.Pandoc.Readers.Org.Blocks (blockList, meta)

32import Text.Pandoc.Readers.Org.Blocks (blockList, meta)

31import Text.Pandoc.Readers.Org.ParserState (optionsToParserState)

33import Text.Pandoc.Readers.Org.ParserState (optionsToParserState)

32import Text.Pandoc.Readers.Org.Parsing (OrgParser, readWithM)

34import Text.Pandoc.Readers.Org.Parsing (OrgParser, readWithM)

src/Text/Pandoc/Readers/Org/BlockStarts.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -40,6 +41,7 @@ module Text.Pandoc.Readers.Org.BlockStarts

40 , endOfBlock

41 , endOfBlock

41 ) where

42 ) where

44+import Prelude

43import Control.Monad (void)

45import Control.Monad (void)

44import Text.Pandoc.Readers.Org.Parsing

46import Text.Pandoc.Readers.Org.Parsing

src/Text/Pandoc/Readers/Org/Blocks.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ module Text.Pandoc.Readers.Org.Blocks

31 , meta

32 , meta

32 ) where

33 ) where

35+import Prelude

34import Text.Pandoc.Readers.Org.BlockStarts

36import Text.Pandoc.Readers.Org.BlockStarts

35import Text.Pandoc.Readers.Org.DocumentTree (documentTree, headlineToBlocks)

37import Text.Pandoc.Readers.Org.DocumentTree (documentTree, headlineToBlocks)

36import Text.Pandoc.Readers.Org.Inlines

38import Text.Pandoc.Readers.Org.Inlines

src/Text/Pandoc/Readers/Org/DocumentTree.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -32,6 +33,7 @@ module Text.Pandoc.Readers.Org.DocumentTree

32 , headlineToBlocks

33 , headlineToBlocks

33 ) where

34 ) where

36+import Prelude

35import Control.Arrow ((***))

37import Control.Arrow ((***))

36import Control.Monad (guard, void)

38import Control.Monad (guard, void)

37import Data.Char (toLower, toUpper)

39import Data.Char (toLower, toUpper)

src/Text/Pandoc/Readers/Org/ExportSettings.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ module Text.Pandoc.Readers.Org.ExportSettings

29 ( exportSettings

30 ( exportSettings

30 ) where

31 ) where

33+import Prelude

32import Text.Pandoc.Readers.Org.ParserState

34import Text.Pandoc.Readers.Org.ParserState

33import Text.Pandoc.Readers.Org.Parsing

35import Text.Pandoc.Readers.Org.Parsing

src/Text/Pandoc/Readers/Org/Inlines.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -33,6 +34,7 @@ module Text.Pandoc.Readers.Org.Inlines

33 , linkTarget

34 , linkTarget

34 ) where

35 ) where

37+import Prelude

36import Text.Pandoc.Readers.Org.BlockStarts (endOfBlock, noteMarker)

38import Text.Pandoc.Readers.Org.BlockStarts (endOfBlock, noteMarker)

37import Text.Pandoc.Readers.Org.ParserState

39import Text.Pandoc.Readers.Org.ParserState

38import Text.Pandoc.Readers.Org.Parsing

40import Text.Pandoc.Readers.Org.Parsing

src/Text/Pandoc/Readers/Org/Meta.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE TupleSections #-}

3{-# LANGUAGE TupleSections #-}

3{-

4{-

@@ -33,6 +34,7 @@ module Text.Pandoc.Readers.Org.Meta

33 , metaLine

34 , metaLine

34 ) where

35 ) where

37+import Prelude

36import Text.Pandoc.Readers.Org.BlockStarts

38import Text.Pandoc.Readers.Org.BlockStarts

37import Text.Pandoc.Readers.Org.ExportSettings (exportSettings)

39import Text.Pandoc.Readers.Org.ExportSettings (exportSettings)

38import Text.Pandoc.Readers.Org.Inlines

40import Text.Pandoc.Readers.Org.Inlines

src/Text/Pandoc/Readers/Org/ParserState.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE MultiParamTypeClasses #-}

3{-# LANGUAGE MultiParamTypeClasses #-}

3{-

4{-

@@ -54,6 +55,7 @@ module Text.Pandoc.Readers.Org.ParserState

54 , optionsToParserState

55 , optionsToParserState

55 ) where

56 ) where

58+import Prelude

57import Control.Monad.Reader (ReaderT, asks, local)

59import Control.Monad.Reader (ReaderT, asks, local)

59import Data.Default (Default (..))

61import Data.Default (Default (..))

src/Text/Pandoc/Readers/Org/Parsing.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -112,6 +113,7 @@ module Text.Pandoc.Readers.Org.Parsing

112 , getPosition

113 , getPosition

113 ) where

114 ) where

114

115

116+import Prelude

115import Text.Pandoc.Readers.Org.ParserState

117import Text.Pandoc.Readers.Org.ParserState

116

118

117import Text.Pandoc.Parsing hiding (F, anyLine, blanklines, newline,

119import Text.Pandoc.Parsing hiding (F, anyLine, blanklines, newline,

src/Text/Pandoc/Readers/Org/Shared.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -33,6 +34,7 @@ module Text.Pandoc.Readers.Org.Shared

33 , translateLang

34 , translateLang

34 ) where

35 ) where

37+import Prelude

36import Data.Char (isAlphaNum)

38import Data.Char (isAlphaNum)

37import Data.List (isPrefixOf, isSuffixOf)

39import Data.List (isPrefixOf, isSuffixOf)

src/Text/Pandoc/Readers/RST.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -31,6 +32,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

31Conversion from reStructuredText to 'Pandoc' document.

32Conversion from reStructuredText to 'Pandoc' document.

32-}

33-}

33module Text.Pandoc.Readers.RST ( readRST ) where

34module Text.Pandoc.Readers.RST ( readRST ) where

35+import Prelude

34import Control.Arrow (second)

36import Control.Arrow (second)

35import Control.Monad (forM_, guard, liftM, mplus, mzero, when)

37import Control.Monad (forM_, guard, liftM, mplus, mzero, when)

36import Control.Monad.Except (throwError)

38import Control.Monad.Except (throwError)

src/Text/Pandoc/Readers/TWiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE RelaxedPolyRec #-}

4{-# LANGUAGE RelaxedPolyRec #-}

@@ -35,6 +36,7 @@ Conversion of twiki text to 'Pandoc' document.

35module Text.Pandoc.Readers.TWiki ( readTWiki

36module Text.Pandoc.Readers.TWiki ( readTWiki

36 ) where

37 ) where

39+import Prelude

38import Control.Monad

40import Control.Monad

39import Control.Monad.Except (throwError)

41import Control.Monad.Except (throwError)

40import Data.Char (isAlphaNum)

42import Data.Char (isAlphaNum)

src/Text/Pandoc/Readers/Textile.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

3 2010-2018 John MacFarlane

4 2010-2018 John MacFarlane

@@ -52,6 +53,7 @@ TODO : refactor common patterns across readers :

54module Text.Pandoc.Readers.Textile ( readTextile) where

55module Text.Pandoc.Readers.Textile ( readTextile) where

56+import Prelude

55import Control.Monad (guard, liftM)

57import Control.Monad (guard, liftM)

56import Control.Monad.Except (throwError)

58import Control.Monad.Except (throwError)

57import Data.Char (digitToInt, isUpper)

59import Data.Char (digitToInt, isUpper)

src/Text/Pandoc/Readers/TikiWiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

@@ -19,6 +20,7 @@ Conversion of TikiWiki text to 'Pandoc' document.

19module Text.Pandoc.Readers.TikiWiki ( readTikiWiki

20module Text.Pandoc.Readers.TikiWiki ( readTikiWiki

20 ) where

21 ) where

23+import Prelude

22import Control.Monad

24import Control.Monad

23import Control.Monad.Except (throwError)

25import Control.Monad.Except (throwError)

24import qualified Data.Foldable as F

26import qualified Data.Foldable as F

src/Text/Pandoc/Readers/Txt2Tags.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ module Text.Pandoc.Readers.Txt2Tags ( readTxt2Tags

31 )

32 )

32 where

33 where

35+import Prelude

34import Control.Monad (guard, void, when)

36import Control.Monad (guard, void, when)

35import Control.Monad.Except (catchError, throwError)

37import Control.Monad.Except (catchError, throwError)

36import Control.Monad.Reader (Reader, asks, runReader)

38import Control.Monad.Reader (Reader, asks, runReader)

src/Text/Pandoc/Readers/Vimwiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-

3{-

@@ -64,6 +65,7 @@ Conversion of vimwiki text to 'Pandoc' document.

65module Text.Pandoc.Readers.Vimwiki ( readVimwiki

66module Text.Pandoc.Readers.Vimwiki ( readVimwiki

66 ) where

67 ) where

68+import Prelude

67import Control.Monad (guard)

69import Control.Monad (guard)

68import Control.Monad.Except (throwError)

70import Control.Monad.Except (throwError)

69import Data.Default

71import Data.Default

src/Text/Pandoc/SelfContained.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -31,6 +32,7 @@ offline, by incorporating linked images, CSS, and scripts into

31the HTML using data URIs.

32the HTML using data URIs.

32-}

33-}

33module Text.Pandoc.SelfContained ( makeDataURI, makeSelfContained ) where

34module Text.Pandoc.SelfContained ( makeDataURI, makeSelfContained ) where

35+import Prelude

34import Codec.Compression.GZip as Gzip

36import Codec.Compression.GZip as Gzip

35import Control.Applicative ((<|>))

37import Control.Applicative ((<|>))

36import Control.Monad.Except (throwError)

38import Control.Monad.Except (throwError)

src/Text/Pandoc/Shared.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE DeriveDataTypeable #-}

3{-# LANGUAGE DeriveDataTypeable #-}

3{-# LANGUAGE FlexibleContexts #-}

4{-# LANGUAGE FlexibleContexts #-}

@@ -100,6 +101,7 @@ module Text.Pandoc.Shared (

100 pandocVersion

101 pandocVersion

101 ) where

102 ) where

102

103

104+import Prelude

103import Codec.Archive.Zip

105import Codec.Archive.Zip

104import qualified Control.Exception as E

106import qualified Control.Exception as E

105import Control.Monad (MonadPlus (..), msum, unless)

107import Control.Monad (MonadPlus (..), msum, unless)

src/Text/Pandoc/Slides.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -29,6 +30,7 @@ Utility functions for splitting documents into slides for slide

29show formats (dzslides, revealjs, s5, slidy, slideous, beamer).

30show formats (dzslides, revealjs, s5, slidy, slideous, beamer).

30-}

31-}

31module Text.Pandoc.Slides ( getSlideLevel, prepSlides ) where

32module Text.Pandoc.Slides ( getSlideLevel, prepSlides ) where

33+import Prelude

32import Text.Pandoc.Definition

34import Text.Pandoc.Definition

34-- | Find level of header that starts slides (defined as the least header

36-- | Find level of header that starts slides (defined as the least header

src/Text/Pandoc/Templates.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

@@ -38,6 +39,7 @@ module Text.Pandoc.Templates ( module Text.DocTemplates

38 , getDefaultTemplate

39 , getDefaultTemplate

39 ) where

40 ) where

42+import Prelude

41import Control.Monad.Except (throwError)

43import Control.Monad.Except (throwError)

42import Data.Aeson (ToJSON (..))

44import Data.Aeson (ToJSON (..))

43import qualified Data.Text as T

45import qualified Data.Text as T

src/Text/Pandoc/Translations.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE GeneralizedNewtypeDeriving #-}

4{-# LANGUAGE GeneralizedNewtypeDeriving #-}

@@ -46,6 +47,7 @@ module Text.Pandoc.Translations (

46 , readTranslations

47 , readTranslations

47 )

48 )

48where

49where

50+import Prelude

49import Data.Aeson.Types (typeMismatch)

51import Data.Aeson.Types (typeMismatch)

50import qualified Data.HashMap.Strict as HM

52import qualified Data.HashMap.Strict as HM

51import qualified Data.Map as M

53import qualified Data.Map as M

src/Text/Pandoc/UTF8.hs+1

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

src/Text/Pandoc/UUID.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -31,6 +32,7 @@ in RFC4122. See http://tools.ietf.org/html/rfc4122

32module Text.Pandoc.UUID ( UUID(..), getRandomUUID, getUUID ) where

33module Text.Pandoc.UUID ( UUID(..), getRandomUUID, getUUID ) where

35+import Prelude

34import Data.Bits (clearBit, setBit)

36import Data.Bits (clearBit, setBit)

35import Data.Word

37import Data.Word

36import System.Random (RandomGen, getStdGen, randoms)

38import System.Random (RandomGen, getStdGen, randoms)

src/Text/Pandoc/Writers.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -82,6 +83,7 @@ module Text.Pandoc.Writers

82 , getWriter

83 , getWriter

83 ) where

84 ) where

86+import Prelude

85import Data.Aeson

87import Data.Aeson

86import qualified Data.ByteString.Lazy as BL

88import qualified Data.ByteString.Lazy as BL

87import Data.List (intercalate)

89import Data.List (intercalate)

src/Text/Pandoc/Writers/AsciiDoc.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -37,6 +38,7 @@ that it has omitted the construct.

37AsciiDoc: <http://www.methods.co.nz/asciidoc/>

38AsciiDoc: <http://www.methods.co.nz/asciidoc/>

38-}

39-}

39module Text.Pandoc.Writers.AsciiDoc (writeAsciiDoc) where

40module Text.Pandoc.Writers.AsciiDoc (writeAsciiDoc) where

41+import Prelude

40import Control.Monad.State.Strict

42import Control.Monad.State.Strict

41import Data.Aeson (Result (..), Value (String), fromJSON, toJSON)

43import Data.Aeson (Result (..), Value (String), fromJSON, toJSON)

42import Data.Char (isPunctuation, isSpace)

44import Data.Char (isPunctuation, isSpace)

src/Text/Pandoc/Writers/CommonMark.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -32,6 +33,7 @@ CommonMark: <http://commonmark.org>

32-}

33-}

33module Text.Pandoc.Writers.CommonMark (writeCommonMark) where

34module Text.Pandoc.Writers.CommonMark (writeCommonMark) where

36+import Prelude

35import CMarkGFM

37import CMarkGFM

36import Control.Monad.State.Strict (State, get, modify, runState)

38import Control.Monad.State.Strict (State, get, modify, runState)

37import Data.Foldable (foldrM)

39import Data.Foldable (foldrM)

src/Text/Pandoc/Writers/ConTeXt.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE ScopedTypeVariables #-}

3{-# LANGUAGE ScopedTypeVariables #-}

3{-

4{-

@@ -30,6 +31,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

30Conversion of 'Pandoc' format into ConTeXt.

31Conversion of 'Pandoc' format into ConTeXt.

31-}

32-}

32module Text.Pandoc.Writers.ConTeXt ( writeConTeXt ) where

33module Text.Pandoc.Writers.ConTeXt ( writeConTeXt ) where

34+import Prelude

33import Control.Monad.State.Strict

35import Control.Monad.State.Strict

34import Data.Char (ord, isDigit)

36import Data.Char (ord, isDigit)

35import Data.List (intercalate, intersperse)

37import Data.List (intercalate, intersperse)

src/Text/Pandoc/Writers/Custom.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE FlexibleInstances #-}

3{-# LANGUAGE FlexibleInstances #-}

@@ -30,6 +31,7 @@ Conversion of 'Pandoc' documents to custom markup using

30a lua writer.

31a lua writer.

31-}

32-}

32module Text.Pandoc.Writers.Custom ( writeCustom ) where

33module Text.Pandoc.Writers.Custom ( writeCustom ) where

34+import Prelude

33import Control.Arrow ((***))

35import Control.Arrow ((***))

34import Control.Exception

36import Control.Exception

35import Control.Monad (when)

37import Control.Monad (when)

src/Text/Pandoc/Writers/Docbook.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-

4{-

@@ -30,6 +31,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

30Conversion of 'Pandoc' documents to Docbook XML.

31Conversion of 'Pandoc' documents to Docbook XML.

31-}

32-}

32module Text.Pandoc.Writers.Docbook ( writeDocbook4, writeDocbook5 ) where

33module Text.Pandoc.Writers.Docbook ( writeDocbook4, writeDocbook5 ) where

34+import Prelude

33import Control.Monad.Reader

35import Control.Monad.Reader

34import Data.Char (toLower)

36import Data.Char (toLower)

35import Data.Generics (everywhere, mkT)

37import Data.Generics (everywhere, mkT)

src/Text/Pandoc/Writers/Docx.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE RankNTypes #-}

3{-# LANGUAGE RankNTypes #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -32,6 +33,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

32Conversion of 'Pandoc' documents to docx.

33Conversion of 'Pandoc' documents to docx.

33-}

34-}

34module Text.Pandoc.Writers.Docx ( writeDocx ) where

35module Text.Pandoc.Writers.Docx ( writeDocx ) where

36+import Prelude

35import Codec.Archive.Zip

37import Codec.Archive.Zip

36import Control.Applicative ((<|>))

38import Control.Applicative ((<|>))

37import Control.Monad.Except (catchError)

39import Control.Monad.Except (catchError)

src/Text/Pandoc/Writers/DokuWiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -39,6 +40,7 @@ DokuWiki: <https://www.dokuwiki.org/dokuwiki>

39-}

40-}

41module Text.Pandoc.Writers.DokuWiki ( writeDokuWiki ) where

42module Text.Pandoc.Writers.DokuWiki ( writeDokuWiki ) where

43+import Prelude

42import Control.Monad (zipWithM)

44import Control.Monad (zipWithM)

43import Control.Monad.Reader (ReaderT, ask, local, runReaderT)

45import Control.Monad.Reader (ReaderT, ask, local, runReaderT)

44import Control.Monad.State.Strict (StateT, evalStateT)

46import Control.Monad.State.Strict (StateT, evalStateT)

src/Text/Pandoc/Writers/EPUB.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE FlexibleContexts #-}

3{-# LANGUAGE FlexibleContexts #-}

3{-# LANGUAGE PatternGuards #-}

4{-# LANGUAGE PatternGuards #-}

@@ -32,6 +33,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

32Conversion of 'Pandoc' documents to EPUB.

33Conversion of 'Pandoc' documents to EPUB.

33-}

34-}

34module Text.Pandoc.Writers.EPUB ( writeEPUB2, writeEPUB3 ) where

35module Text.Pandoc.Writers.EPUB ( writeEPUB2, writeEPUB3 ) where

36+import Prelude

35import Codec.Archive.Zip (Entry, addEntryToArchive, eRelativePath, emptyArchive,

37import Codec.Archive.Zip (Entry, addEntryToArchive, eRelativePath, emptyArchive,

36 fromArchive, fromEntry, toEntry)

38 fromArchive, fromEntry, toEntry)

37import Control.Monad (mplus, unless, when, zipWithM)

39import Control.Monad (mplus, unless, when, zipWithM)

src/Text/Pandoc/Writers/FB2.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE PatternGuards #-}

3{-

4{-

@@ -37,6 +38,7 @@ FictionBook is an XML-based e-book format. For more information see:

37-}

38-}

38module Text.Pandoc.Writers.FB2 (writeFB2) where

39module Text.Pandoc.Writers.FB2 (writeFB2) where

41+import Prelude

40import Control.Monad (zipWithM)

42import Control.Monad (zipWithM)

41import Control.Monad.Except (catchError)

43import Control.Monad.Except (catchError)

42import Control.Monad.State.Strict (StateT, evalStateT, get, lift, liftM, modify)

44import Control.Monad.State.Strict (StateT, evalStateT, get, lift, liftM, modify)

src/Text/Pandoc/Writers/HTML.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -45,6 +46,7 @@ module Text.Pandoc.Writers.HTML (

45 writeRevealJs,

46 writeRevealJs,

46 tagWithAttributes

47 tagWithAttributes

47 ) where

48 ) where

49+import Prelude

48import Control.Monad.State.Strict

50import Control.Monad.State.Strict

49import Data.Char (ord, toLower)

51import Data.Char (ord, toLower)

50import Data.List (intercalate, intersperse, isPrefixOf, partition)

52import Data.List (intercalate, intersperse, isPrefixOf, partition)

src/Text/Pandoc/Writers/Haddock.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE ScopedTypeVariables #-}

3{-# LANGUAGE ScopedTypeVariables #-}

@@ -33,6 +34,7 @@ Conversion of 'Pandoc' documents to haddock markup.

33Haddock: <http://www.haskell.org/haddock/doc/html/>

34Haddock: <http://www.haskell.org/haddock/doc/html/>

34-}

35-}

35module Text.Pandoc.Writers.Haddock (writeHaddock) where

36module Text.Pandoc.Writers.Haddock (writeHaddock) where

37+import Prelude

36import Control.Monad.State.Strict

38import Control.Monad.State.Strict

37import Data.Default

39import Data.Default

38import Data.Text (Text)

40import Data.Text (Text)

src/Text/Pandoc/Writers/ICML.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -16,6 +17,7 @@ InCopy is the companion word-processor to Adobe InDesign and ICML documents can

16into InDesign with File -> Place.

17into InDesign with File -> Place.

17-}

18-}

18module Text.Pandoc.Writers.ICML (writeICML) where

19module Text.Pandoc.Writers.ICML (writeICML) where

20+import Prelude

19import Control.Monad.Except (catchError)

21import Control.Monad.Except (catchError)

20import Control.Monad.State.Strict

22import Control.Monad.State.Strict

21import Data.List (intersperse, isInfixOf, isPrefixOf, stripPrefix)

23import Data.List (intersperse, isInfixOf, isPrefixOf, stripPrefix)

src/Text/Pandoc/Writers/JATS.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-

4{-

@@ -31,6 +32,7 @@ Reference:

31https://jats.nlm.nih.gov/publishing/tag-library

32https://jats.nlm.nih.gov/publishing/tag-library

32-}

33-}

33module Text.Pandoc.Writers.JATS ( writeJATS ) where

34module Text.Pandoc.Writers.JATS ( writeJATS ) where

35+import Prelude

34import Control.Monad.Reader

36import Control.Monad.Reader

35import Data.Char (toLower)

37import Data.Char (toLower)

36import Data.Generics (everywhere, mkT)

38import Data.Generics (everywhere, mkT)

src/Text/Pandoc/Writers/LaTeX.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -34,6 +35,7 @@ module Text.Pandoc.Writers.LaTeX (

34 writeLaTeX

35 writeLaTeX

35 , writeBeamer

36 , writeBeamer

36 ) where

37 ) where

38+import Prelude

37import Control.Applicative ((<|>))

39import Control.Applicative ((<|>))

38import Control.Monad.State.Strict

40import Control.Monad.State.Strict

39import Data.Aeson (FromJSON, object, (.=))

41import Data.Aeson (FromJSON, object, (.=))

src/Text/Pandoc/Writers/Man.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -30,6 +31,7 @@ Conversion of 'Pandoc' documents to groff man page format.

31-}

32-}

32module Text.Pandoc.Writers.Man ( writeMan) where

33module Text.Pandoc.Writers.Man ( writeMan) where

34+import Prelude

33import Control.Monad.State.Strict

35import Control.Monad.State.Strict

34import Data.List (intercalate, intersperse, sort, stripPrefix)

36import Data.List (intercalate, intersperse, sort, stripPrefix)

35import qualified Data.Map as Map

37import qualified Data.Map as Map

src/Text/Pandoc/Writers/Markdown.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE MultiWayIf #-}

2{-# LANGUAGE MultiWayIf #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4{-# LANGUAGE ScopedTypeVariables #-}

@@ -34,6 +35,7 @@ Conversion of 'Pandoc' documents to markdown-formatted plain text.

34Markdown: <http://daringfireball.net/projects/markdown/>

35Markdown: <http://daringfireball.net/projects/markdown/>

35-}

36-}

36module Text.Pandoc.Writers.Markdown (writeMarkdown, writePlain) where

37module Text.Pandoc.Writers.Markdown (writeMarkdown, writePlain) where

38+import Prelude

37import Control.Monad.Reader

39import Control.Monad.Reader

38import Control.Monad.State.Strict

40import Control.Monad.State.Strict

39import Data.Char (chr, isPunctuation, isSpace, ord, isAlphaNum)

41import Data.Char (chr, isPunctuation, isSpace, ord, isAlphaNum)

src/Text/Pandoc/Writers/Math.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Text.Pandoc.Writers.Math

2module Text.Pandoc.Writers.Math

2 ( texMathToInlines

3 ( texMathToInlines

3 , convertMath

4 , convertMath

@@ -6,6 +7,7 @@ module Text.Pandoc.Writers.Math

6 )

7 )

7where

8where

10+import Prelude

9import Text.Pandoc.Class

11import Text.Pandoc.Class

10import Text.Pandoc.Definition

12import Text.Pandoc.Definition

11import Text.Pandoc.Logging

13import Text.Pandoc.Logging

src/Text/Pandoc/Writers/MediaWiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -30,6 +31,7 @@ Conversion of 'Pandoc' documents to MediaWiki markup.

30MediaWiki: <http://www.mediawiki.org/wiki/MediaWiki>

31MediaWiki: <http://www.mediawiki.org/wiki/MediaWiki>

31-}

32-}

32module Text.Pandoc.Writers.MediaWiki ( writeMediaWiki ) where

33module Text.Pandoc.Writers.MediaWiki ( writeMediaWiki ) where

34+import Prelude

33import Control.Monad.Reader

35import Control.Monad.Reader

34import Control.Monad.State.Strict

36import Control.Monad.State.Strict

35import Data.List (intercalate)

37import Data.List (intercalate)

src/Text/Pandoc/Writers/Ms.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -36,6 +37,7 @@ TODO:

36-}

37-}

38module Text.Pandoc.Writers.Ms ( writeMs ) where

39module Text.Pandoc.Writers.Ms ( writeMs ) where

40+import Prelude

39import Control.Monad.State.Strict

41import Control.Monad.State.Strict

40import Data.Char (isLower, isUpper, toUpper, ord)

42import Data.Char (isLower, isUpper, toUpper, ord)

41import Data.List (intercalate, intersperse, sort)

43import Data.List (intercalate, intersperse, sort)

src/Text/Pandoc/Writers/Muse.hs+4−2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -42,6 +43,7 @@ However, @\<literal style="html">@ tag is used for HTML raw blocks

42even though it is supported only in Emacs Muse.

43even though it is supported only in Emacs Muse.

43-}

44-}

44module Text.Pandoc.Writers.Muse (writeMuse) where

45module Text.Pandoc.Writers.Muse (writeMuse) where

46+import Prelude

45import Control.Monad.State.Strict

47import Control.Monad.State.Strict

46import Data.Text (Text)

48import Data.Text (Text)

47import Data.List (intersperse, transpose, isInfixOf)

49import Data.List (intersperse, transpose, isInfixOf)

@@ -185,8 +187,8 @@ blockToMuse (OrderedList (start, style, _) items) = do

185 -> [Block] -- ^ list item (list of blocks)

187 -> [Block] -- ^ list item (list of blocks)

186 -> StateT WriterState m Doc

188 -> StateT WriterState m Doc

187 orderedListItemToMuse marker item = do

189 orderedListItemToMuse marker item = do

188− contents <- blockListToMuse item

190+ contents <- blockListToMuse item

189− return $ hang (length marker + 1) (text marker <> space) contents

191+ return $ hang (length marker + 1) (text marker <> space) contents

190blockToMuse (BulletList items) = do

192blockToMuse (BulletList items) = do

191 contents <- mapM bulletListItemToMuse items

193 contents <- mapM bulletListItemToMuse items

192 -- ensure that sublists have preceding blank line

194 -- ensure that sublists have preceding blank line

src/Text/Pandoc/Writers/Native.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -30,6 +31,7 @@ Conversion of a 'Pandoc' document to a string representation.

30-}

31-}

31module Text.Pandoc.Writers.Native ( writeNative )

32module Text.Pandoc.Writers.Native ( writeNative )

32where

33where

34+import Prelude

33import Data.List (intersperse)

35import Data.List (intersperse)

34import Data.Text (Text)

36import Data.Text (Text)

35import Text.Pandoc.Class (PandocMonad)

37import Text.Pandoc.Class (PandocMonad)

src/Text/Pandoc/Writers/ODT.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE ScopedTypeVariables #-}

2{-# LANGUAGE ScopedTypeVariables #-}

2{-

3{-

@@ -29,6 +30,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

29Conversion of 'Pandoc' documents to ODT.

30Conversion of 'Pandoc' documents to ODT.

30-}

31-}

31module Text.Pandoc.Writers.ODT ( writeODT ) where

32module Text.Pandoc.Writers.ODT ( writeODT ) where

33+import Prelude

32import Codec.Archive.Zip

34import Codec.Archive.Zip

33import Control.Monad.Except (catchError)

35import Control.Monad.Except (catchError)

34import Control.Monad.State.Strict

36import Control.Monad.State.Strict

src/Text/Pandoc/Writers/OOXML.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -39,6 +40,7 @@ module Text.Pandoc.Writers.OOXML ( mknode

39 , fitToPage

40 , fitToPage

40 ) where

41 ) where

43+import Prelude

42import Codec.Archive.Zip

44import Codec.Archive.Zip

43import Control.Monad.Reader

45import Control.Monad.Reader

44import qualified Data.ByteString as B

46import qualified Data.ByteString as B

src/Text/Pandoc/Writers/OPML.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE CPP #-}

2{-# LANGUAGE CPP #-}

2{-

3{-

@@ -29,6 +30,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

29Conversion of 'Pandoc' documents to OPML XML.

30Conversion of 'Pandoc' documents to OPML XML.

30-}

31-}

31module Text.Pandoc.Writers.OPML ( writeOPML) where

32module Text.Pandoc.Writers.OPML ( writeOPML) where

33+import Prelude

32import Control.Monad.Except (throwError)

34import Control.Monad.Except (throwError)

33import Data.Text (Text, unpack)

35import Data.Text (Text, unpack)

34import qualified Data.Text as T

36import qualified Data.Text as T

src/Text/Pandoc/Writers/OpenDocument.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE FlexibleContexts #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE PatternGuards #-}

4{-# LANGUAGE PatternGuards #-}

@@ -32,6 +33,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

32Conversion of 'Pandoc' documents to OpenDocument XML.

33Conversion of 'Pandoc' documents to OpenDocument XML.

33-}

34-}

34module Text.Pandoc.Writers.OpenDocument ( writeOpenDocument ) where

35module Text.Pandoc.Writers.OpenDocument ( writeOpenDocument ) where

36+import Prelude

35import Control.Arrow ((***), (>>>))

37import Control.Arrow ((***), (>>>))

36import Control.Monad.State.Strict hiding (when)

38import Control.Monad.State.Strict hiding (when)

37import Data.Char (chr)

39import Data.Char (chr)

src/Text/Pandoc/Writers/Org.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -35,6 +36,7 @@ Conversion of 'Pandoc' documents to Emacs Org-Mode.

35Org-Mode: <http://orgmode.org>

36Org-Mode: <http://orgmode.org>

36-}

37-}

37module Text.Pandoc.Writers.Org (writeOrg) where

38module Text.Pandoc.Writers.Org (writeOrg) where

39+import Prelude

38import Control.Monad.State.Strict

40import Control.Monad.State.Strict

39import Data.Char (isAlphaNum, toLower)

41import Data.Char (isAlphaNum, toLower)

40import Data.List (intersect, intersperse, isPrefixOf, partition, transpose)

42import Data.List (intersect, intersperse, isPrefixOf, partition, transpose)

src/Text/Pandoc/Writers/Powerpoint.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

3{-

4{-

@@ -41,6 +42,7 @@ This is a wrapper around two modules:

42module Text.Pandoc.Writers.Powerpoint (writePowerpoint) where

43module Text.Pandoc.Writers.Powerpoint (writePowerpoint) where

45+import Prelude

44import Codec.Archive.Zip

46import Codec.Archive.Zip

45import Text.Pandoc.Definition

47import Text.Pandoc.Definition

46import Text.Pandoc.Walk

48import Text.Pandoc.Walk

src/Text/Pandoc/Writers/Powerpoint/Output.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE PatternGuards #-}

3{-

4{-

@@ -34,6 +35,7 @@ Text.Pandoc.Writers.Powerpoint.Presentation) to a zip archive.

34module Text.Pandoc.Writers.Powerpoint.Output ( presentationToArchive

35module Text.Pandoc.Writers.Powerpoint.Output ( presentationToArchive

35 ) where

36 ) where

38+import Prelude

37import Control.Monad.Except (throwError, catchError)

39import Control.Monad.Except (throwError, catchError)

38import Control.Monad.Reader

40import Control.Monad.Reader

39import Control.Monad.State

41import Control.Monad.State

src/Text/Pandoc/Writers/Powerpoint/Presentation.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE PatternGuards #-}

3{-

4{-

@@ -57,6 +58,7 @@ module Text.Pandoc.Writers.Powerpoint.Presentation ( documentToPresentation

57 ) where

58 ) where

61+import Prelude

60import Control.Monad.Reader

62import Control.Monad.Reader

61import Control.Monad.State

63import Control.Monad.State

62import Data.List (intercalate)

64import Data.List (intercalate)

src/Text/Pandoc/Writers/RST.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -31,6 +32,7 @@ Conversion of 'Pandoc' documents to reStructuredText.

31reStructuredText: <http://docutils.sourceforge.net/rst.html>

32reStructuredText: <http://docutils.sourceforge.net/rst.html>

32-}

33-}

33module Text.Pandoc.Writers.RST ( writeRST ) where

34module Text.Pandoc.Writers.RST ( writeRST ) where

35+import Prelude

34import Control.Monad.State.Strict

36import Control.Monad.State.Strict

35import Data.Char (isSpace, toLower)

37import Data.Char (isSpace, toLower)

36import Data.List (isPrefixOf, stripPrefix)

38import Data.List (isPrefixOf, stripPrefix)

src/Text/Pandoc/Writers/RTF.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE ScopedTypeVariables #-}

2{-# LANGUAGE ScopedTypeVariables #-}

2{-

3{-

@@ -30,6 +31,7 @@ Conversion of 'Pandoc' documents to RTF (rich text format).

30-}

31-}

31module Text.Pandoc.Writers.RTF ( writeRTF

32module Text.Pandoc.Writers.RTF ( writeRTF

32 ) where

33 ) where

34+import Prelude

33import Control.Monad.Except (catchError, throwError)

35import Control.Monad.Except (catchError, throwError)

34import Control.Monad

36import Control.Monad

35import qualified Data.ByteString as B

37import qualified Data.ByteString as B

src/Text/Pandoc/Writers/Shared.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -44,6 +45,7 @@ module Text.Pandoc.Writers.Shared (

44 , stripLeadingTrailingSpace

45 , stripLeadingTrailingSpace

45 )

46 )

46where

47where

48+import Prelude

47import Control.Monad (zipWithM)

49import Control.Monad (zipWithM)

48import Data.Aeson (FromJSON (..), Result (..), ToJSON (..), Value (Object),

50import Data.Aeson (FromJSON (..), Result (..), ToJSON (..), Value (Object),

49 encode, fromJSON)

51 encode, fromJSON)

src/Text/Pandoc/Writers/TEI.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE PatternGuards #-}

3{-# LANGUAGE PatternGuards #-}

3{-

4{-

@@ -30,6 +31,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

30Conversion of 'Pandoc' documents to Docbook XML.

31Conversion of 'Pandoc' documents to Docbook XML.

31-}

32-}

32module Text.Pandoc.Writers.TEI (writeTEI) where

33module Text.Pandoc.Writers.TEI (writeTEI) where

34+import Prelude

33import Data.Char (toLower)

35import Data.Char (toLower)

34import Data.List (isPrefixOf, stripPrefix)

36import Data.List (isPrefixOf, stripPrefix)

35import Data.Text (Text)

37import Data.Text (Text)

src/Text/Pandoc/Writers/Texinfo.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-

3{-

@@ -31,6 +32,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

31Conversion of 'Pandoc' format into Texinfo.

32Conversion of 'Pandoc' format into Texinfo.

32-}

33-}

33module Text.Pandoc.Writers.Texinfo ( writeTexinfo ) where

34module Text.Pandoc.Writers.Texinfo ( writeTexinfo ) where

35+import Prelude

34import Control.Monad.Except (throwError)

36import Control.Monad.Except (throwError)

35import Control.Monad.State.Strict

37import Control.Monad.State.Strict

36import Data.Char (chr, ord)

38import Data.Char (chr, ord)

src/Text/Pandoc/Writers/Textile.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -30,6 +31,7 @@ Conversion of 'Pandoc' documents to Textile markup.

30Textile: <http://thresholdstate.com/articles/4312/the-textile-reference-manual>

31Textile: <http://thresholdstate.com/articles/4312/the-textile-reference-manual>

31-}

32-}

32module Text.Pandoc.Writers.Textile ( writeTextile ) where

33module Text.Pandoc.Writers.Textile ( writeTextile ) where

34+import Prelude

33import Control.Monad.State.Strict

35import Control.Monad.State.Strict

34import Data.Char (isSpace)

36import Data.Char (isSpace)

35import Data.List (intercalate)

37import Data.List (intercalate)

src/Text/Pandoc/Writers/ZimWiki.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

3 2017-2018 Alex Ivkin

4 2017-2018 Alex Ivkin

@@ -32,6 +33,7 @@ http://zim-wiki.org/manual/Help/Wiki_Syntax.html

32-}

33-}

34module Text.Pandoc.Writers.ZimWiki ( writeZimWiki ) where

35module Text.Pandoc.Writers.ZimWiki ( writeZimWiki ) where

36+import Prelude

35import Control.Monad (zipWithM)

37import Control.Monad (zipWithM)

36import Control.Monad.State.Strict (StateT, evalStateT, gets, modify)

38import Control.Monad.State.Strict (StateT, evalStateT, gets, modify)

37import Data.Default (Default (..))

39import Data.Default (Default (..))

src/Text/Pandoc/XML.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-

2{-

@@ -36,6 +37,7 @@ module Text.Pandoc.XML ( escapeCharForXML,

36 toEntities,

37 toEntities,

37 fromEntities ) where

38 fromEntities ) where

40+import Prelude

39import Data.Char (isAscii, isSpace, ord)

41import Data.Char (isAscii, isSpace, ord)

40import Data.Text (Text)

42import Data.Text (Text)

41import qualified Data.Text as T

43import qualified Data.Text as T

stack.yaml+2−5

@@ -14,14 +14,11 @@ packages:

14- '.'

15extra-deps:

16- pandoc-citeproc-0.14.2

17−- hslua-0.9.5

18- skylighting-0.7.0.2

17- skylighting-0.7.0.2

19- skylighting-core-0.7.0.2

18- skylighting-core-0.7.0.2

20- ansi-terminal-0.7.1.1

19- ansi-terminal-0.7.1.1

21- tasty-1.0.0.1

20- tasty-1.0.0.1

22−- texmath-0.10.1.1

23−- tagsoup-0.14.6

24- pandoc-types-1.17.4.2

21- pandoc-types-1.17.4.2

25ghc-options:

22ghc-options:

26− "$locals": -fhide-source-paths

23+ "$locals": -fhide-source-paths -XNoImplicitPrelude

27−resolver: lts-10.3

24+resolver: lts-10.10

test/Tests/Command.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Command (findPandoc, runTest, tests)

2module Tests.Command (findPandoc, runTest, tests)

2where

3where

5+import Prelude

4import Data.Algorithm.Diff

6import Data.Algorithm.Diff

5import qualified Data.ByteString as BS

7import qualified Data.ByteString as BS

6import Data.List (isSuffixOf)

8import Data.List (isSuffixOf)

test/Tests/Helpers.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE TypeSynonymInstances #-}

3{-# LANGUAGE TypeSynonymInstances #-}

3-- Utility functions for the test suite.

4-- Utility functions for the test suite.

@@ -13,6 +14,7 @@ module Tests.Helpers ( test

13 )

14 )

14 where

15 where

17+import Prelude

16import Data.Algorithm.Diff

18import Data.Algorithm.Diff

17import qualified Data.Map as M

19import qualified Data.Map as M

18import Data.Text (Text, unpack)

20import Data.Text (Text, unpack)

test/Tests/Lua.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Lua ( tests ) where

3module Tests.Lua ( tests ) where

5+import Prelude

4import Control.Monad (when)

6import Control.Monad (when)

5import Data.Version (Version (versionBranch))

7import Data.Version (Version (versionBranch))

6import System.FilePath ((</>))

8import System.FilePath ((</>))

test/Tests/Old.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Old (tests) where

2module Tests.Old (tests) where

4+import Prelude

3import Data.Algorithm.Diff

5import Data.Algorithm.Diff

4import Prelude hiding (readFile)

6import Prelude hiding (readFile)

5import System.Exit

7import System.Exit

test/Tests/Readers/Creole.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Creole (tests) where

3module Tests.Readers.Creole (tests) where

5+import Prelude

4import Data.Text (Text)

6import Data.Text (Text)

5import qualified Data.Text as T

7import qualified Data.Text as T

6import Test.Tasty

8import Test.Tasty

test/Tests/Readers/Docx.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Readers.Docx (tests) where

2module Tests.Readers.Docx (tests) where

4+import Prelude

3import Codec.Archive.Zip

5import Codec.Archive.Zip

4import qualified Data.ByteString as BS

6import qualified Data.ByteString as BS

5import qualified Data.ByteString.Lazy as B

7import qualified Data.ByteString.Lazy as B

test/Tests/Readers/EPUB.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Readers.EPUB (tests) where

2module Tests.Readers.EPUB (tests) where

4+import Prelude

3import qualified Data.ByteString.Lazy as BL

5import qualified Data.ByteString.Lazy as BL

4import Test.Tasty

6import Test.Tasty

5import Test.Tasty.HUnit

7import Test.Tasty.HUnit

test/Tests/Readers/HTML.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.HTML (tests) where

3module Tests.Readers.HTML (tests) where

5+import Prelude

4import Data.Text (Text)

6import Data.Text (Text)

5import Test.Tasty

7import Test.Tasty

6import Tests.Helpers

8import Tests.Helpers

test/Tests/Readers/JATS.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.JATS (tests) where

3module Tests.Readers.JATS (tests) where

5+import Prelude

4import Data.Text (Text)

6import Data.Text (Text)

5import Test.Tasty

7import Test.Tasty

6import Tests.Helpers

8import Tests.Helpers

test/Tests/Readers/LaTeX.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.LaTeX (tests) where

3module Tests.Readers.LaTeX (tests) where

5+import Prelude

4import Data.Text (Text)

6import Data.Text (Text)

5import qualified Data.Text as T

7import qualified Data.Text as T

6import qualified Text.Pandoc.UTF8 as UTF8

8import qualified Text.Pandoc.UTF8 as UTF8

test/Tests/Readers/Markdown.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Markdown (tests) where

3module Tests.Readers.Markdown (tests) where

5+import Prelude

4import Data.Text (Text, unpack)

6import Data.Text (Text, unpack)

5import qualified Data.Text as T

7import qualified Data.Text as T

6import Test.Tasty

8import Test.Tasty

test/Tests/Readers/Muse.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Muse (tests) where

3module Tests.Readers.Muse (tests) where

5+import Prelude

4import Data.List (intersperse)

6import Data.List (intersperse)

5import Data.Text (Text)

7import Data.Text (Text)

6import qualified Data.Text as T

8import qualified Data.Text as T

test/Tests/Readers/Odt.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Readers.Odt (tests) where

2module Tests.Readers.Odt (tests) where

4+import Prelude

3import Control.Monad (liftM)

5import Control.Monad (liftM)

4import qualified Data.ByteString as BS

6import qualified Data.ByteString as BS

5import qualified Data.ByteString.Lazy as B

7import qualified Data.ByteString.Lazy as B

test/Tests/Readers/Org/Block.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Block (tests) where

3module Tests.Readers.Org.Block (tests) where

5+import Prelude

4import Test.Tasty (TestTree, testGroup)

6import Test.Tasty (TestTree, testGroup)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:), spcSep)

8import Tests.Readers.Org.Shared ((=:), spcSep)

test/Tests/Readers/Org/Block/CodeBlock.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Block.CodeBlock (tests) where

3module Tests.Readers.Org.Block.CodeBlock (tests) where

5+import Prelude

4import Test.Tasty (TestTree)

6import Test.Tasty (TestTree)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:), spcSep)

8import Tests.Readers.Org.Shared ((=:), spcSep)

test/Tests/Readers/Org/Block/Figure.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Block.Figure (tests) where

3module Tests.Readers.Org.Block.Figure (tests) where

5+import Prelude

4import Test.Tasty (TestTree)

6import Test.Tasty (TestTree)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:))

8import Tests.Readers.Org.Shared ((=:))

test/Tests/Readers/Org/Block/Header.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Block.Header (tests) where

3module Tests.Readers.Org.Block.Header (tests) where

5+import Prelude

4import Test.Tasty (TestTree, testGroup)

6import Test.Tasty (TestTree, testGroup)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:), spcSep, tagSpan)

8import Tests.Readers.Org.Shared ((=:), spcSep, tagSpan)

test/Tests/Readers/Org/Block/List.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Block.List (tests) where

3module Tests.Readers.Org.Block.List (tests) where

5+import Prelude

4import Test.Tasty (TestTree)

6import Test.Tasty (TestTree)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:), spcSep)

8import Tests.Readers.Org.Shared ((=:), spcSep)

test/Tests/Readers/Org/Block/Table.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Block.Table (tests) where

3module Tests.Readers.Org.Block.Table (tests) where

5+import Prelude

4import Test.Tasty (TestTree)

6import Test.Tasty (TestTree)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:), spcSep)

8import Tests.Readers.Org.Shared ((=:), spcSep)

test/Tests/Readers/Org/Directive.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Directive (tests) where

3module Tests.Readers.Org.Directive (tests) where

5+import Prelude

4import Data.Time (UTCTime (UTCTime), secondsToDiffTime)

6import Data.Time (UTCTime (UTCTime), secondsToDiffTime)

5import Data.Time.Calendar (Day (ModifiedJulianDay))

7import Data.Time.Calendar (Day (ModifiedJulianDay))

6import Test.Tasty (TestTree, testGroup)

8import Test.Tasty (TestTree, testGroup)

test/Tests/Readers/Org/Inline.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Inline (tests) where

3module Tests.Readers.Org.Inline (tests) where

5+import Prelude

4import Data.List (intersperse)

6import Data.List (intersperse)

5import Test.Tasty (TestTree, testGroup)

7import Test.Tasty (TestTree, testGroup)

6import Tests.Helpers ((=?>))

8import Tests.Helpers ((=?>))

test/Tests/Readers/Org/Inline/Citation.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Inline.Citation (tests) where

3module Tests.Readers.Org.Inline.Citation (tests) where

5+import Prelude

4import Test.Tasty (TestTree, testGroup)

6import Test.Tasty (TestTree, testGroup)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:))

8import Tests.Readers.Org.Shared ((=:))

test/Tests/Readers/Org/Inline/Note.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Inline.Note (tests) where

3module Tests.Readers.Org.Inline.Note (tests) where

5+import Prelude

4import Test.Tasty (TestTree)

6import Test.Tasty (TestTree)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:))

8import Tests.Readers.Org.Shared ((=:))

test/Tests/Readers/Org/Inline/Smart.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Inline.Smart (tests) where

3module Tests.Readers.Org.Inline.Smart (tests) where

5+import Prelude

4import Data.Text (Text)

6import Data.Text (Text)

5import Test.Tasty (TestTree)

7import Test.Tasty (TestTree)

6import Tests.Helpers ((=?>), purely, test)

8import Tests.Helpers ((=?>), purely, test)

test/Tests/Readers/Org/Meta.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Org.Meta (tests) where

3module Tests.Readers.Org.Meta (tests) where

5+import Prelude

4import Test.Tasty (TestTree, testGroup)

6import Test.Tasty (TestTree, testGroup)

5import Tests.Helpers ((=?>))

7import Tests.Helpers ((=?>))

6import Tests.Readers.Org.Shared ((=:), spcSep)

8import Tests.Readers.Org.Shared ((=:), spcSep)

test/Tests/Readers/Org/Shared.hs+2

@@ -1,3 +1,4 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Readers.Org.Shared

2module Tests.Readers.Org.Shared

2 ( (=:)

3 ( (=:)

3 , org

4 , org

@@ -5,6 +6,7 @@ module Tests.Readers.Org.Shared

5 , tagSpan

6 , tagSpan

6 ) where

7 ) where

9+import Prelude

8import Data.List (intersperse)

10import Data.List (intersperse)

9import Data.Text (Text)

11import Data.Text (Text)

10import Tests.Helpers (ToString, purely, test)

12import Tests.Helpers (ToString, purely, test)

test/Tests/Readers/RST.hs+2

@@ -1,7 +1,9 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE ScopedTypeVariables #-}

3{-# LANGUAGE ScopedTypeVariables #-}

3module Tests.Readers.RST (tests) where

4module Tests.Readers.RST (tests) where

6+import Prelude

5import Data.Text (Text)

7import Data.Text (Text)

6import qualified Data.Text as T

8import qualified Data.Text as T

7import Test.Tasty

9import Test.Tasty

test/Tests/Readers/Txt2Tags.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Readers.Txt2Tags (tests) where

3module Tests.Readers.Txt2Tags (tests) where

5+import Prelude

4import Data.List (intersperse)

6import Data.List (intersperse)

5import Data.Text (Text)

7import Data.Text (Text)

6import qualified Data.Text as T

8import qualified Data.Text as T

test/Tests/Shared.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Shared (tests) where

2module Tests.Shared (tests) where

4+import Prelude

3import System.FilePath.Posix (joinPath)

5import System.FilePath.Posix (joinPath)

4import Test.Tasty

6import Test.Tasty

5import Test.Tasty.HUnit (assertBool, testCase, (@?=))

7import Test.Tasty.HUnit (assertBool, testCase, (@?=))

test/Tests/Writers/AsciiDoc.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Writers.AsciiDoc (tests) where

2module Tests.Writers.AsciiDoc (tests) where

4+import Prelude

3import Data.Text (unpack)

5import Data.Text (unpack)

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

test/Tests/Writers/ConTeXt.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.ConTeXt (tests) where

3module Tests.Writers.ConTeXt (tests) where

5+import Prelude

4import Data.Text (unpack)

6import Data.Text (unpack)

5import Test.Tasty

7import Test.Tasty

6import Test.Tasty.QuickCheck

8import Test.Tasty.QuickCheck

test/Tests/Writers/Docbook.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.Docbook (tests) where

3module Tests.Writers.Docbook (tests) where

5+import Prelude

4import Data.Text (unpack)

6import Data.Text (unpack)

5import Test.Tasty

7import Test.Tasty

6import Tests.Helpers

8import Tests.Helpers

test/Tests/Writers/Docx.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Writers.Docx (tests) where

2module Tests.Writers.Docx (tests) where

4+import Prelude

3import Text.Pandoc

5import Text.Pandoc

4import Test.Tasty

6import Test.Tasty

5import Tests.Writers.OOXML

7import Tests.Writers.OOXML

test/Tests/Writers/FB2.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.FB2 (tests) where

3module Tests.Writers.FB2 (tests) where

5+import Prelude

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

6import Text.Pandoc

8import Text.Pandoc

test/Tests/Writers/HTML.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.HTML (tests) where

3module Tests.Writers.HTML (tests) where

5+import Prelude

4import Data.Text (unpack)

6import Data.Text (unpack)

5import Test.Tasty

7import Test.Tasty

6import Tests.Helpers

8import Tests.Helpers

test/Tests/Writers/JATS.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.JATS (tests) where

3module Tests.Writers.JATS (tests) where

5+import Prelude

4import Data.Text (unpack)

6import Data.Text (unpack)

5import Test.Tasty

7import Test.Tasty

6import Tests.Helpers

8import Tests.Helpers

test/Tests/Writers/LaTeX.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.LaTeX (tests) where

3module Tests.Writers.LaTeX (tests) where

5+import Prelude

4import Data.Text (unpack)

6import Data.Text (unpack)

5import Test.Tasty

7import Test.Tasty

6import Tests.Helpers

8import Tests.Helpers

test/Tests/Writers/Markdown.hs+2

@@ -1,7 +1,9 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2{-# OPTIONS_GHC -fno-warn-name-shadowing #-}

3{-# OPTIONS_GHC -fno-warn-name-shadowing #-}

3module Tests.Writers.Markdown (tests) where

4module Tests.Writers.Markdown (tests) where

6+import Prelude

5import Data.Text (unpack)

7import Data.Text (unpack)

6import Test.Tasty

8import Test.Tasty

7import Tests.Helpers

9import Tests.Helpers

test/Tests/Writers/Muse.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Writers.Muse (tests) where

2module Tests.Writers.Muse (tests) where

4+import Prelude

3import Data.Text (unpack)

5import Data.Text (unpack)

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

test/Tests/Writers/Native.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Writers.Native (tests) where

2module Tests.Writers.Native (tests) where

4+import Prelude

3import Data.Text (unpack)

5import Data.Text (unpack)

4import Test.Tasty

6import Test.Tasty

5import Test.Tasty.QuickCheck

7import Test.Tasty.QuickCheck

test/Tests/Writers/OOXML.hs+2

@@ -1,8 +1,10 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE PatternGuards #-}

2{-# LANGUAGE OverloadedStrings #-}

3{-# LANGUAGE OverloadedStrings #-}

4module Tests.Writers.OOXML (ooxmlTest) where

5module Tests.Writers.OOXML (ooxmlTest) where

7+import Prelude

6import Text.Pandoc

8import Text.Pandoc

7import Test.Tasty

9import Test.Tasty

8import Test.Tasty.Golden.Advanced

10import Test.Tasty.Golden.Advanced

test/Tests/Writers/Org.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.Org (tests) where

3module Tests.Writers.Org (tests) where

5+import Prelude

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

6import Text.Pandoc

8import Text.Pandoc

test/Tests/Writers/Plain.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.Plain (tests) where

3module Tests.Writers.Plain (tests) where

5+import Prelude

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

6import Text.Pandoc

8import Text.Pandoc

test/Tests/Writers/Powerpoint.hs+2

@@ -1,5 +1,7 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1module Tests.Writers.Powerpoint (tests) where

2module Tests.Writers.Powerpoint (tests) where

4+import Prelude

3import Tests.Writers.OOXML (ooxmlTest)

5import Tests.Writers.OOXML (ooxmlTest)

4import Text.Pandoc

6import Text.Pandoc

5import Test.Tasty

7import Test.Tasty

test/Tests/Writers/RST.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.RST (tests) where

3module Tests.Writers.RST (tests) where

5+import Prelude

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

6import Text.Pandoc

8import Text.Pandoc

test/Tests/Writers/TEI.hs+2

@@ -1,6 +1,8 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# LANGUAGE OverloadedStrings #-}

2{-# LANGUAGE OverloadedStrings #-}

2module Tests.Writers.TEI (tests) where

3module Tests.Writers.TEI (tests) where

5+import Prelude

4import Test.Tasty

6import Test.Tasty

5import Tests.Helpers

7import Tests.Helpers

6import Text.Pandoc

8import Text.Pandoc

test/test-pandoc.hs+2

@@ -1,7 +1,9 @@

1+{-# LANGUAGE NoImplicitPrelude #-}

1{-# OPTIONS_GHC -Wall #-}

2{-# OPTIONS_GHC -Wall #-}

3module Main where

4module Main where

6+import Prelude

5import GHC.IO.Encoding

7import GHC.IO.Encoding

6import Test.Tasty

8import Test.Tasty

7import qualified Tests.Command

9import qualified Tests.Command