Removed some imports we don't need with the new Prelude.
commit984ffb749081dbb1986e504392005fb0cab70cdd
authorJohn MacFarlane <jgm@berkeley.edu>
dateMon 15 Mar 2021, 18:02 (6 years ago)
parent886c677
src/Text/Pandoc/App.hs−1
@@ -32,7 +32,6 @@ import qualified Data.ByteString as BS
3232import qualified Data.ByteString.Char8 as B8
3333import qualified Data.ByteString.Lazy as BL
3434import Data.Char (toLower)
35−import Data.Maybe (fromMaybe, isJust, isNothing)
3635import qualified Data.Set as Set
3736import Data.Text (Text)
3837import qualified Data.Text as T
src/Text/Pandoc/App/CommandLineOptions.hs−1
@@ -37,7 +37,6 @@ import Data.List (intercalate, sort, foldl')
3737import Data.List (isPrefixOf)
3838#endif
3939#endif
40−import Data.Maybe (fromMaybe, isJust)
4140import Data.Text (Text)
4241import Safe (tailDef)
4342import Skylighting (Style, Syntax (..), defaultSyntaxMap, parseTheme)
src/Text/Pandoc/App/Opt.hs−1
@@ -30,7 +30,6 @@ import Control.Monad.State.Strict (StateT, modify, gets)
3030import System.FilePath ( addExtension, (</>), takeExtension, takeDirectory )
3131import System.Directory ( canonicalizePath )
3232import Data.Char (isLower, toLower)
33−import Data.Maybe (fromMaybe)
3433import GHC.Generics hiding (Meta)
3534import Text.Pandoc.Filter (Filter (..))
3635import Text.Pandoc.Logging (Verbosity (WARNING), LogMessage(..))
src/Text/Pandoc/App/OutputSettings.hs−1
@@ -27,7 +27,6 @@ import Control.Monad.Except (throwError)
2727import Control.Monad.Trans
2828import Data.Char (toLower)
2929import Data.List (find)
30−import Data.Maybe (fromMaybe)
3130import Skylighting (defaultSyntaxMap)
3231import Skylighting.Parser (addSyntaxDefinition, parseSyntaxDefinition)
3332import System.Directory (getCurrentDirectory)
src/Text/Pandoc/CSS.hs−1
@@ -18,7 +18,6 @@ module Text.Pandoc.CSS
1818 )
1919where
2020
21−import Data.Maybe (mapMaybe, listToMaybe)
2221import Data.Text (Text, pack)
2322import Text.Pandoc.Shared (trim)
2423import Text.Parsec
src/Text/Pandoc/Citeproc.hs−1
@@ -41,7 +41,6 @@ import Data.Char (isPunctuation, isUpper)
4141import Data.Default (Default(def))
4242import qualified Data.Foldable as Foldable
4343import qualified Data.Map as M
44−import Data.Maybe (mapMaybe, fromMaybe)
4544import Data.Ord ()
4645import qualified Data.Sequence as Seq
4746import qualified Data.Set as Set
src/Text/Pandoc/Citeproc/BibTeX.hs−1
@@ -40,7 +40,6 @@ import Data.Default
4040import Data.Text (Text)
4141import qualified Data.Text as T
4242import qualified Data.Map as Map
43−import Data.Maybe
4443import Text.Pandoc.Parsing hiding ((<|>), many)
4544import Control.Applicative
4645import Data.List.Split (splitOn, splitWhen, wordsBy)
src/Text/Pandoc/Citeproc/MetaValue.hs−1
@@ -12,7 +12,6 @@ import Text.Pandoc.Definition
1212import Text.Pandoc.Builder as B
1313import Text.Pandoc.Walk (query)
1414import Text.Pandoc.Shared (stringify)
15−import Data.Maybe
1615import Safe
1716import qualified Data.Set as Set
1817import qualified Data.Map as M
src/Text/Pandoc/Class/PandocMonad.hs−1
@@ -58,7 +58,6 @@ import Codec.Archive.Zip
5858import Control.Monad.Except (MonadError (catchError, throwError),
5959 MonadTrans, lift, when)
6060import Data.Digest.Pure.SHA (sha1, showDigest)
61−import Data.Maybe (fromMaybe)
6261import Data.List (foldl')
6362import Data.Time (UTCTime)
6463import Data.Time.Clock.POSIX (POSIXTime, utcTimeToPOSIXSeconds,
src/Text/Pandoc/Filter/JSON.hs−1
@@ -16,7 +16,6 @@ import Control.Monad (unless, when)
1616import Control.Monad.Trans (MonadIO (liftIO))
1717import Data.Aeson (eitherDecode', encode)
1818import Data.Char (toLower)
19−import Data.Maybe (isNothing)
2019import qualified Data.Text as T
2120import System.Directory (executable, doesFileExist, findExecutable,
2221 getPermissions)
src/Text/Pandoc/Highlighting.hs−1
@@ -35,7 +35,6 @@ module Text.Pandoc.Highlighting ( highlightingStyles
3535 ) where
3636import Control.Monad
3737import qualified Data.Map as M
38−import Data.Maybe (fromMaybe)
3938import qualified Data.Text as T
4039import Skylighting
4140import Text.Pandoc.Definition
src/Text/Pandoc/Lua/Filter.hs−1
@@ -24,7 +24,6 @@ import Data.Data (Data, DataType, dataTypeConstrs, dataTypeName, dataTypeOf,
2424import Data.Foldable (foldrM)
2525import Data.List (foldl')
2626import Data.Map (Map)
27−import Data.Maybe (fromMaybe)
2827import Foreign.Lua (Lua, Peekable, Pushable, StackIndex)
2928import Text.Pandoc.Definition
3029import Text.Pandoc.Error (PandocError)
src/Text/Pandoc/Lua/Marshaling/Version.hs−1
@@ -20,7 +20,6 @@ module Text.Pandoc.Lua.Marshaling.Version
2020 where
2121
2222import Data.Text (Text)
23−import Data.Maybe (fromMaybe)
2423import Data.Version (Version (..), makeVersion, parseVersion, showVersion)
2524import Foreign.Lua (Lua, Optional (..), NumResults,
2625 Peekable, Pushable, StackIndex)
src/Text/Pandoc/Lua/Module/Pandoc.hs−1
@@ -18,7 +18,6 @@ import Prelude hiding (read)
1818import Control.Monad (when)
1919import Control.Monad.Except (throwError)
2020import Data.Default (Default (..))
21−import Data.Maybe (fromMaybe)
2221import Foreign.Lua (Lua, NumResults, Optional, Peekable, Pushable)
2322import System.Exit (ExitCode (..))
2423import Text.Pandoc.Class.PandocIO (runIO)
src/Text/Pandoc/MIME.hs−1
@@ -20,7 +20,6 @@ module Text.Pandoc.MIME (
2020import Data.List (isPrefixOf, isSuffixOf)
2121import qualified Data.Map as M
2222import qualified Data.Text as T
23−import Data.Maybe (fromMaybe, listToMaybe)
2423import Data.Tuple (swap)
2524import System.FilePath
2625
src/Text/Pandoc/MediaBag.hs−1
@@ -24,7 +24,6 @@ module Text.Pandoc.MediaBag (
2424import qualified Data.ByteString.Lazy as BL
2525import Data.Data (Data)
2626import qualified Data.Map as M
27−import Data.Maybe (fromMaybe)
2827import Data.Typeable (Typeable)
2928import System.FilePath
3029import qualified System.FilePath.Posix as Posix
src/Text/Pandoc/Options.hs−1
@@ -35,7 +35,6 @@ module Text.Pandoc.Options ( module Text.Pandoc.Extensions
3535 ) where
3636import Control.Applicative ((<|>))
3737import Data.Char (toLower)
38−import Data.Maybe (fromMaybe)
3938import Data.Data (Data)
4039import Data.Default
4140import Data.Text (Text)
src/Text/Pandoc/PDF.hs−1
@@ -23,7 +23,6 @@ import qualified Data.ByteString as BS
2323import Data.ByteString.Lazy (ByteString)
2424import qualified Data.ByteString.Lazy as BL
2525import qualified Data.ByteString.Lazy.Char8 as BC
26−import Data.Maybe (fromMaybe)
2726import Data.Text (Text)
2827import qualified Data.Text as T
2928import qualified Data.Text.Lazy as TL
src/Text/Pandoc/Parsing.hs−1
@@ -196,7 +196,6 @@ import Data.Default
196196import Data.Functor (($>))
197197import Data.List (intercalate, transpose)
198198import qualified Data.Map as M
199−import Data.Maybe (mapMaybe, fromMaybe)
200199import qualified Data.Set as Set
201200import Data.String
202201import Data.Text (Text)
src/Text/Pandoc/Readers/Creole.hs−1
@@ -15,7 +15,6 @@ module Text.Pandoc.Readers.Creole ( readCreole
1515
1616import Control.Monad.Except (guard, liftM2, throwError)
1717import qualified Data.Foldable as F
18−import Data.Maybe (fromMaybe)
1918import Data.Text (Text)
2019import qualified Data.Text as T
2120import qualified Text.Pandoc.Builder as B
src/Text/Pandoc/Readers/DocBook.hs−1
@@ -18,7 +18,6 @@ import Data.Either (rights)
1818import Data.Foldable (asum)
1919import Data.Generics
2020import Data.List (intersperse,elemIndex)
21−import Data.Maybe (fromMaybe,mapMaybe)
2221import Data.Text (Text)
2322import qualified Data.Text as T
2423import qualified Data.Text.Lazy as TL
src/Text/Pandoc/Readers/Docx.hs−1
@@ -67,7 +67,6 @@ import Data.List (delete, intersect)
6767import Data.Char (isSpace)
6868import qualified Data.Map as M
6969import qualified Data.Text as T
70−import Data.Maybe (isJust, fromMaybe)
7170import Data.Sequence (ViewL (..), viewl)
7271import qualified Data.Sequence as Seq
7372import qualified Data.Set as Set
src/Text/Pandoc/Readers/Docx/Parse.hs−1
@@ -64,7 +64,6 @@ import qualified Data.Map as M
6464import Data.List (find)
6565import qualified Data.Text as T
6666import Data.Text (Text)
67−import Data.Maybe
6867import System.FilePath
6968import Text.Pandoc.Readers.Docx.Util
7069import Text.Pandoc.Readers.Docx.Fields
src/Text/Pandoc/Readers/Docx/Parse/Styles.hs−1
@@ -50,7 +50,6 @@ import qualified Data.Map as M
5050import qualified Data.Text as T
5151import qualified Data.Text.Read
5252import Data.Text (Text)
53−import Data.Maybe
5453import Data.Coerce
5554import Text.Pandoc.Readers.Docx.Util
5655import qualified Text.Pandoc.UTF8 as UTF8
src/Text/Pandoc/Readers/DokuWiki.hs−1
@@ -20,7 +20,6 @@ import Control.Monad.Except (throwError)
2020import Data.Char (isAlphaNum, isDigit)
2121import qualified Data.Foldable as F
2222import Data.List (transpose)
23−import Data.Maybe (fromMaybe, catMaybes)
2423import Data.Text (Text)
2524import qualified Data.Text as T
2625import qualified Text.Pandoc.Builder as B
src/Text/Pandoc/Readers/EPUB.hs−1
@@ -26,7 +26,6 @@ import qualified Data.ByteString.Lazy as BL (ByteString)
2626import qualified Data.Text as T
2727import Data.Text (Text)
2828import qualified Data.Map as M (Map, elems, fromList, lookup)
29−import Data.Maybe (mapMaybe)
3029import qualified Data.Text.Lazy as TL
3130import qualified Data.Text.Lazy.Encoding as TL
3231import Network.URI (unEscapeString)
src/Text/Pandoc/Readers/FB2.hs−1
@@ -33,7 +33,6 @@ import Data.Text (Text)
3333import qualified Data.Text as T
3434import qualified Data.Text.Lazy as TL
3535import Data.Default
36−import Data.Maybe
3736import Text.HTML.TagSoup.Entity (lookupEntity)
3837import Text.Pandoc.Builder
3938import Text.Pandoc.Class.PandocMonad (PandocMonad, insertMedia, report)
src/Text/Pandoc/Readers/HTML.hs−1
@@ -33,7 +33,6 @@ import Data.Default (Default (..), def)
3333import Data.Foldable (for_)
3434import Data.List.Split (splitWhen)
3535import qualified Data.Map as M
36−import Data.Maybe (fromMaybe, isJust, isNothing)
3736import Data.Monoid (First (..))
3837import qualified Data.Set as Set
3938import Data.Text (Text)
src/Text/Pandoc/Readers/HTML/Parsing.hs−1
@@ -31,7 +31,6 @@ module Text.Pandoc.Readers.HTML.Parsing
3131where
3232
3333import Control.Monad (guard, void, mzero)
34−import Data.Maybe (fromMaybe)
3534import Data.Text (Text)
3635import Text.HTML.TagSoup
3736 ( Attribute, Tag (..), isTagText, isTagPosition, isTagOpen, isTagClose, (~==) )
src/Text/Pandoc/Readers/HTML/Table.hs−1
@@ -16,7 +16,6 @@ HTML table parser.
1616module Text.Pandoc.Readers.HTML.Table (pTable) where
1717
1818import Control.Applicative ((<|>))
19−import Data.Maybe (fromMaybe)
2019import Data.Text (Text)
2120import Text.HTML.TagSoup
2221import Text.Pandoc.Builder (Blocks)
src/Text/Pandoc/Readers/Haddock.hs−1
@@ -17,7 +17,6 @@ module Text.Pandoc.Readers.Haddock
1717
1818import Control.Monad.Except (throwError)
1919import Data.List (intersperse)
20−import Data.Maybe (fromMaybe)
2120import Data.Text (Text, unpack)
2221import qualified Data.Text as T
2322import Documentation.Haddock.Parser
src/Text/Pandoc/Readers/Ipynb.hs−1
@@ -16,7 +16,6 @@ Ipynb (Jupyter notebook JSON format) reader for pandoc.
1616module Text.Pandoc.Readers.Ipynb ( readIpynb )
1717where
1818import Data.Char (isDigit)
19−import Data.Maybe (fromMaybe)
2019import Data.Digest.Pure.SHA (sha1, showDigest)
2120import Text.Pandoc.Options
2221import qualified Data.Scientific as Scientific
src/Text/Pandoc/Readers/JATS.hs−1
@@ -21,7 +21,6 @@ import Data.Default
2121import Data.Generics
2222import Data.List (foldl', intersperse)
2323import qualified Data.Map as Map
24−import Data.Maybe (maybeToList, fromMaybe)
2524import Data.Text (Text)
2625import qualified Data.Text as T
2726import qualified Data.Text.Lazy as TL
src/Text/Pandoc/Readers/LaTeX.hs+1−2
@@ -29,7 +29,6 @@ import Data.Char (isDigit, isLetter, toUpper, chr)
2929import Data.Default
3030import Data.List (intercalate)
3131import qualified Data.Map as M
32−import Data.Maybe (fromMaybe, maybeToList)
3332import qualified Data.Set as Set
3433import Data.Text (Text)
3534import qualified Data.Text as T
@@ -245,7 +244,7 @@ doxspace =
245244
246245removeDoubleQuotes :: Text -> Text
247246removeDoubleQuotes t =
248− Data.Maybe.fromMaybe t $ T.stripPrefix "\"" t >>= T.stripSuffix "\""
247+ fromMaybe t $ T.stripPrefix "\"" t >>= T.stripSuffix "\""
249248
250249doubleQuote :: PandocMonad m => LP m Inlines
251250doubleQuote =
src/Text/Pandoc/Readers/LaTeX/Inline.hs−1
@@ -38,7 +38,6 @@ import Text.Pandoc.Parsing (getOption, updateState, getState, notFollowedBy,
3838 option, many1, try)
3939import Data.Char (isDigit)
4040import Text.Pandoc.Highlighting (fromListingsLanguage,)
41−import Data.Maybe (maybeToList, fromMaybe)
4241import Text.Pandoc.Options (ReaderOptions(..))
4342import qualified Data.Text.Normalize as Normalize
4443import qualified Text.Pandoc.Translations as Translations
src/Text/Pandoc/Readers/LaTeX/Math.hs−1
@@ -11,7 +11,6 @@ module Text.Pandoc.Readers.LaTeX.Math
1111 , proof
1212 )
1313where
14−import Data.Maybe (fromMaybe)
1514import Text.Pandoc.Walk (walk)
1615import Text.Pandoc.Builder as B
1716import qualified Data.Sequence as Seq
src/Text/Pandoc/Readers/LaTeX/Table.hs−1
@@ -11,7 +11,6 @@ import Text.Pandoc.Readers.LaTeX.Types
1111import Text.Pandoc.Builder as B
1212import qualified Data.Map as M
1313import Data.Text (Text)
14−import Data.Maybe (fromMaybe)
1514import qualified Data.Text as T
1615import Control.Applicative ((<|>), optional, many)
1716import Control.Monad (when, void)
src/Text/Pandoc/Readers/Man.hs−1
@@ -19,7 +19,6 @@ import Data.Default (Default)
1919import Control.Monad (liftM, mzero, guard, void)
2020import Control.Monad.Trans (lift)
2121import Control.Monad.Except (throwError)
22−import Data.Maybe (catMaybes, isJust)
2322import Data.List (intersperse, intercalate)
2423import qualified Data.Text as T
2524import Text.Pandoc.Builder as B
src/Text/Pandoc/Readers/Markdown.hs−1
@@ -23,7 +23,6 @@ import Control.Monad.Except (throwError)
2323import Data.Char (isAlphaNum, isPunctuation, isSpace)
2424import Data.List (transpose, elemIndex, sortOn, foldl')
2525import qualified Data.Map as M
26−import Data.Maybe
2726import qualified Data.Set as Set
2827import Data.Text (Text)
2928import qualified Data.Text as T
src/Text/Pandoc/Readers/MediaWiki.hs−1
@@ -22,7 +22,6 @@ import Control.Monad.Except (throwError)
2222import Data.Char (isDigit, isSpace)
2323import qualified Data.Foldable as F
2424import Data.List (intersperse)
25−import Data.Maybe (fromMaybe, maybeToList)
2625import Data.Sequence (ViewL (..), viewl, (<|))
2726import qualified Data.Set as Set
2827import Data.Text (Text)
src/Text/Pandoc/Readers/Metadata.hs−1
@@ -20,7 +20,6 @@ import Control.Monad
2020import Control.Monad.Except (throwError)
2121import qualified Data.ByteString.Lazy as BL
2222import qualified Data.Map as M
23−import Data.Maybe
2423import Data.Text (Text)
2524import qualified Data.Text as T
2625import qualified Data.YAML as YAML
src/Text/Pandoc/Readers/Muse.hs−1
@@ -26,7 +26,6 @@ import Data.Default
2626import Data.List (transpose, uncons)
2727import qualified Data.Map as M
2828import qualified Data.Set as Set
29−import Data.Maybe (fromMaybe, isNothing, maybeToList)
3029import Data.Text (Text)
3130import qualified Data.Text as T
3231import Text.Pandoc.Builder (Blocks, Inlines, underline)
src/Text/Pandoc/Readers/OPML.hs−1
@@ -14,7 +14,6 @@ Conversion of OPML to 'Pandoc' document.
1414module Text.Pandoc.Readers.OPML ( readOPML ) where
1515import Control.Monad.State.Strict
1616import Data.Default
17−import Data.Maybe (fromMaybe)
1817import Data.Text (Text)
1918import qualified Data.Text as T
2019import qualified Data.Text.Lazy as TL
src/Text/Pandoc/Readers/Odt/ContentReader.hs−1
@@ -32,7 +32,6 @@ import Data.Foldable (fold)
3232import Data.List (find)
3333import qualified Data.Map as M
3434import qualified Data.Text as T
35−import Data.Maybe
3635import Data.Semigroup (First(..), Option(..))
3736
3837import Text.TeXMath (readMathML, writeTeX)
src/Text/Pandoc/Readers/Odt/Generic/Utils.hs−1
@@ -30,7 +30,6 @@ import Control.Category (Category, (<<<), (>>>))
3030import qualified Control.Category as Cat (id)
3131import Data.Char (isSpace)
3232import qualified Data.Foldable as F (Foldable, foldr)
33−import Data.Maybe
3433import Data.Text (Text)
3534import qualified Data.Text as T
3635
src/Text/Pandoc/Readers/Odt/Generic/XMLConverter.hs−1
@@ -63,7 +63,6 @@ import Data.Either ( rights )
6363import qualified Data.Map as M
6464import Data.Text (Text)
6565import Data.Default
66−import Data.Maybe
6766import Data.List (foldl')
6867
6968import qualified Text.Pandoc.XML.Light as XML
src/Text/Pandoc/Readers/Odt/Namespaces.hs−1
@@ -15,7 +15,6 @@ module Text.Pandoc.Readers.Odt.Namespaces ( Namespace (..)
1515 ) where
1616
1717import qualified Data.Map as M (empty, insert)
18−import Data.Maybe (fromMaybe, listToMaybe)
1918import Data.Text (Text)
2019import qualified Data.Text as T
2120import Text.Pandoc.Readers.Odt.Generic.Namespaces
src/Text/Pandoc/Readers/Odt/StyleReader.hs−1
@@ -46,7 +46,6 @@ import Data.Default
4646import qualified Data.Foldable as F
4747import Data.List (unfoldr, foldl')
4848import qualified Data.Map as M
49−import Data.Maybe
5049import Data.Text (Text)
5150import qualified Data.Text as T
5251import qualified Data.Set as S
src/Text/Pandoc/Readers/Org/Blocks.hs−1
@@ -37,7 +37,6 @@ import Data.Char (isSpace)
3737import Data.Default (Default)
3838import Data.Functor (($>))
3939import Data.List (foldl', intersperse)
40−import Data.Maybe (fromMaybe, isJust, isNothing)
4140import Data.Text (Text)
4241
4342import qualified Data.Text as T
src/Text/Pandoc/Readers/Org/DocumentTree.hs−1
@@ -18,7 +18,6 @@ module Text.Pandoc.Readers.Org.DocumentTree
1818import Control.Arrow ((***), first)
1919import Control.Monad (guard)
2020import Data.List (intersperse)
21−import Data.Maybe (mapMaybe)
2221import Data.Text (Text)
2322import Text.Pandoc.Builder (Blocks, Inlines)
2423import Text.Pandoc.Class.PandocMonad (PandocMonad)
src/Text/Pandoc/Readers/Org/ExportSettings.hs−1
@@ -19,7 +19,6 @@ import Text.Pandoc.Readers.Org.Parsing
1919
2020import Control.Monad (mzero, void)
2121import Data.Char (toLower)
22−import Data.Maybe (listToMaybe)
2322import Data.Text (Text, unpack)
2423
2524-- | Read and handle space separated org-mode export settings.
src/Text/Pandoc/Readers/Org/Meta.hs−1
@@ -31,7 +31,6 @@ import Text.Pandoc.Shared (blocksToInlines, safeRead)
3131import Control.Monad (mzero, void)
3232import Data.List (intercalate, intersperse)
3333import Data.Map (Map)
34−import Data.Maybe (fromMaybe)
3534import Data.Text (Text)
3635import Network.HTTP (urlEncode)
3736import qualified Data.Map as Map
src/Text/Pandoc/Readers/RST.hs−1
@@ -21,7 +21,6 @@ import Control.Monad.Identity (Identity (..))
2121import Data.Char (isHexDigit, isSpace, toUpper, isAlphaNum)
2222import Data.List (deleteFirstsBy, elemIndex, nub, sort, transpose)
2323import qualified Data.Map as M
24−import Data.Maybe (fromMaybe, maybeToList, isJust)
2524import Data.Sequence (ViewR (..), viewr)
2625import Data.Text (Text)
2726import qualified Data.Text as T
src/Text/Pandoc/Readers/TWiki.hs−1
@@ -18,7 +18,6 @@ import Control.Monad
1818import Control.Monad.Except (throwError)
1919import Data.Char (isAlphaNum)
2020import qualified Data.Foldable as F
21−import Data.Maybe (fromMaybe)
2221import Data.Text (Text)
2322import qualified Data.Text as T
2423import Text.HTML.TagSoup
src/Text/Pandoc/Readers/TikiWiki.hs+1−2
@@ -20,7 +20,6 @@ import Control.Monad
2020import Control.Monad.Except (throwError)
2121import qualified Data.Foldable as F
2222import Data.List (dropWhileEnd)
23−import Data.Maybe (fromMaybe)
2423import Data.Text (Text)
2524import qualified Data.Text as T
2625import qualified Text.Pandoc.Builder as B
@@ -339,7 +338,7 @@ listItemLine nest = lineContent >>= parseContent
339338 lineContent = do
340339 content <- anyLine
341340 continuation <- optionMaybe listContinuation
342− return $ filterSpaces content <> "\n" <> Data.Maybe.fromMaybe "" continuation
341+ return $ filterSpaces content <> "\n" <> fromMaybe "" continuation
343342 filterSpaces = T.dropWhileEnd (== ' ')
344343 listContinuation = string (replicate nest '+') >> lineContent
345344 parseContent x = do
src/Text/Pandoc/Readers/Txt2Tags.hs−1
@@ -19,7 +19,6 @@ import Control.Monad.Except (catchError, throwError)
1919import Control.Monad.Reader (Reader, asks, runReader)
2020import Data.Default
2121import Data.List (intercalate, transpose)
22−import Data.Maybe (fromMaybe)
2322import Data.Text (Text)
2423import qualified Data.Text as T
2524import Data.Time.Format (formatTime)
src/Text/Pandoc/Readers/Vimwiki.hs−1
@@ -51,7 +51,6 @@ import Control.Monad (guard)
5151import Control.Monad.Except (throwError)
5252import Data.Default
5353import Data.List (isInfixOf)
54−import Data.Maybe
5554import Data.Text (Text)
5655import qualified Data.Text as T
5756import Text.Pandoc.Builder (Blocks, Inlines, fromList, toList, trimInlines)
src/Text/Pandoc/Shared.hs−1
@@ -111,7 +111,6 @@ import Data.Char (isAlpha, isLower, isSpace, isUpper, toLower, isAlphaNum,
111111 SpacingCombiningMark, EnclosingMark, ConnectorPunctuation))
112112import Data.List (find, intercalate, intersperse, sortOn, foldl')
113113import qualified Data.Map as M
114−import Data.Maybe (mapMaybe, fromMaybe)
115114import Data.Monoid (Any (..))
116115import Data.Sequence (ViewL (..), ViewR (..), viewl, viewr)
117116import qualified Data.Set as Set
src/Text/Pandoc/Writers/AsciiDoc.hs−1
@@ -22,7 +22,6 @@ module Text.Pandoc.Writers.AsciiDoc (writeAsciiDoc, writeAsciiDoctor) where
2222import Control.Monad.State.Strict
2323import Data.Char (isPunctuation, isSpace)
2424import Data.List (intercalate, intersperse)
25−import Data.Maybe (fromMaybe, isJust)
2625import qualified Data.Set as Set
2726import qualified Data.Text as T
2827import Data.Text (Text)
src/Text/Pandoc/Writers/BibTeX.hs−1
@@ -20,7 +20,6 @@ where
2020import Text.Pandoc.Options
2121import Text.Pandoc.Definition
2222import Data.Text (Text)
23−import Data.Maybe (mapMaybe)
2423import Citeproc (parseLang)
2524import Text.Pandoc.Class (PandocMonad)
2625import Text.Pandoc.Citeproc.BibTeX as BibTeX
src/Text/Pandoc/Writers/ConTeXt.hs−1
@@ -16,7 +16,6 @@ module Text.Pandoc.Writers.ConTeXt ( writeConTeXt ) where
1616import Control.Monad.State.Strict
1717import Data.Char (ord, isDigit)
1818import Data.List (intersperse)
19−import Data.Maybe (mapMaybe)
2019import Data.Text (Text)
2120import qualified Data.Text as T
2221import Network.URI (unEscapeString)
src/Text/Pandoc/Writers/CslJson.hs−1
@@ -34,7 +34,6 @@ import Control.Monad.Identity
3434import Citeproc.Locale (getLocale)
3535import Citeproc.CslJson
3636import Text.Pandoc.Options (WriterOptions)
37−import Data.Maybe (mapMaybe)
3837import Data.Aeson.Encode.Pretty (Config (..), Indent (Spaces),
3938 NumberFormat (Generic),
4039 defConfig, encodePretty')
src/Text/Pandoc/Writers/Docbook.hs−1
@@ -15,7 +15,6 @@ Conversion of 'Pandoc' documents to Docbook XML.
1515module Text.Pandoc.Writers.Docbook ( writeDocbook4, writeDocbook5 ) where
1616import Control.Monad.Reader
1717import Data.Generics (everywhere, mkT)
18−import Data.Maybe (isNothing)
1918import Data.Monoid (Any (..))
2019import Data.Text (Text)
2120import qualified Data.Text as T
src/Text/Pandoc/Writers/Docx.hs−1
@@ -28,7 +28,6 @@ import Data.Char (isSpace, isLetter)
2828import Data.List (intercalate, isPrefixOf, isSuffixOf)
2929import Data.String (fromString)
3030import qualified Data.Map as M
31−import Data.Maybe (fromMaybe, isNothing, mapMaybe, maybeToList)
3231import qualified Data.Set as Set
3332import qualified Data.Text as T
3433import Data.Text (Text)
src/Text/Pandoc/Writers/DokuWiki.hs−1
@@ -39,7 +39,6 @@ import Text.Pandoc.Shared (camelCaseToHyphenated, escapeURI, isURI, linesToPara,
3939import Text.Pandoc.Templates (renderTemplate)
4040import Text.DocLayout (render, literal)
4141import Text.Pandoc.Writers.Shared (defField, metaToContext, toLegacyTable)
42−import Data.Maybe (fromMaybe)
4342import qualified Data.Map as M
4443
4544data WriterState = WriterState {
src/Text/Pandoc/Writers/EPUB.hs−1
@@ -27,7 +27,6 @@ import qualified Data.ByteString.Lazy.Char8 as B8
2727import Data.Char (isAlphaNum, isAscii, isDigit)
2828import Data.List (isInfixOf, isPrefixOf)
2929import qualified Data.Map as M
30−import Data.Maybe (fromMaybe, isNothing, mapMaybe, isJust)
3130import qualified Data.Set as Set
3231import qualified Data.Text as T
3332import Data.Text (Text)
src/Text/Pandoc/Writers/HTML.hs−1
@@ -32,7 +32,6 @@ import Control.Monad.State.Strict
3232import Data.Char (ord)
3333import Data.List (intercalate, intersperse, partition, delete, (\\), foldl')
3434import Data.List.NonEmpty (NonEmpty((:|)))
35−import Data.Maybe (fromMaybe, isJust, isNothing)
3635import qualified Data.Set as Set
3736import Data.Text (Text)
3837import qualified Data.Text as T
src/Text/Pandoc/Writers/ICML.hs−1
@@ -20,7 +20,6 @@ module Text.Pandoc.Writers.ICML (writeICML) where
2020import Control.Monad.Except (catchError)
2121import Control.Monad.State.Strict
2222import Data.List (intersperse)
23−import Data.Maybe (fromMaybe, maybeToList)
2423import qualified Data.Set as Set
2524import qualified Data.Text as Text
2625import Data.Text (Text)
src/Text/Pandoc/Writers/Ipynb.hs−1
@@ -16,7 +16,6 @@ module Text.Pandoc.Writers.Ipynb ( writeIpynb )
1616where
1717import Control.Monad.State
1818import qualified Data.Map as M
19−import Data.Maybe (catMaybes, fromMaybe)
2019import Text.Pandoc.Options
2120import Text.Pandoc.Definition
2221import Data.Ipynb as Ipynb
src/Text/Pandoc/Writers/JATS.hs−1
@@ -25,7 +25,6 @@ import Control.Monad.State
2525import Data.Generics (everywhere, mkT)
2626import Data.List (partition)
2727import qualified Data.Map as M
28−import Data.Maybe (fromMaybe)
2928import Data.Time (toGregorian, Day, parseTimeM, defaultTimeLocale, formatTime)
3029import qualified Data.Text as T
3130import Data.Text (Text)
src/Text/Pandoc/Writers/LaTeX.hs−1
@@ -22,7 +22,6 @@ module Text.Pandoc.Writers.LaTeX (
2222import Control.Monad.State.Strict
2323import Data.Char (isDigit)
2424import Data.List (intersperse, nubBy, (\\))
25−import Data.Maybe (catMaybes, fromMaybe, isJust, mapMaybe, isNothing)
2625import qualified Data.Map as M
2726import Data.Text (Text)
2827import qualified Data.Text as T
src/Text/Pandoc/Writers/Man.hs−1
@@ -16,7 +16,6 @@ Conversion of 'Pandoc' documents to roff man page format.
1616module Text.Pandoc.Writers.Man ( writeMan ) where
1717import Control.Monad.State.Strict
1818import Data.List (intersperse)
19−import Data.Maybe (fromMaybe)
2019import Data.Text (Text)
2120import qualified Data.Text as T
2221import Text.Pandoc.Builder (deleteMeta)
src/Text/Pandoc/Writers/Markdown.hs−1
@@ -25,7 +25,6 @@ import Control.Monad.State.Strict
2525import Data.Default
2626import Data.List (intersperse, sortOn, transpose)
2727import qualified Data.Map as M
28−import Data.Maybe (fromMaybe, mapMaybe)
2928import qualified Data.Set as Set
3029import Data.Text (Text)
3130import qualified Data.Text as T
src/Text/Pandoc/Writers/Markdown/Inline.hs−1
@@ -18,7 +18,6 @@ import Control.Monad.State.Strict
1818import Data.Char (isAlphaNum, isDigit)
1919import Data.List (find, intersperse)
2020import qualified Data.Map as M
21−import Data.Maybe (fromMaybe)
2221import Data.Text (Text)
2322import qualified Data.Text as T
2423import Network.HTTP (urlEncode)
src/Text/Pandoc/Writers/MediaWiki.hs−1
@@ -16,7 +16,6 @@ MediaWiki: <http://www.mediawiki.org/wiki/MediaWiki>
1616module Text.Pandoc.Writers.MediaWiki ( writeMediaWiki, highlightingLangs ) where
1717import Control.Monad.Reader
1818import Control.Monad.State.Strict
19−import Data.Maybe (fromMaybe)
2019import qualified Data.Set as Set
2120import Data.Text (Text)
2221import qualified Data.Text as T
src/Text/Pandoc/Writers/Ms.hs−1
@@ -24,7 +24,6 @@ import Control.Monad.State.Strict
2424import Data.Char (isLower, isUpper, ord)
2525import Data.List (intercalate, intersperse)
2626import qualified Data.Map as Map
27−import Data.Maybe (catMaybes)
2827import Data.Text (Text)
2928import qualified Data.Text as T
3029import Network.URI (escapeURIString, isAllowedInURI)
src/Text/Pandoc/Writers/OOXML.hs−1
@@ -29,7 +29,6 @@ import Control.Monad.Except (throwError)
2929import Text.Pandoc.Error
3030import qualified Data.ByteString as B
3131import qualified Data.ByteString.Lazy as BL
32−import Data.Maybe (mapMaybe)
3332import qualified Data.Text as T
3433import Data.Text (Text)
3534import Text.Pandoc.Class.PandocMonad (PandocMonad)
src/Text/Pandoc/Writers/OpenDocument.hs−1
@@ -20,7 +20,6 @@ import Data.Char (chr)
2020import Data.Foldable (find)
2121import Data.List (sortOn, sortBy, foldl')
2222import qualified Data.Map as Map
23−import Data.Maybe (fromMaybe, isNothing)
2423import Data.Ord (comparing)
2524import qualified Data.Set as Set
2625import Data.Text (Text)
src/Text/Pandoc/Writers/Powerpoint/Output.hs−1
@@ -40,7 +40,6 @@ import Text.Pandoc.MIME
4040import qualified Data.ByteString.Lazy as BL
4141import Text.Pandoc.Writers.OOXML
4242import qualified Data.Map as M
43−import Data.Maybe (mapMaybe, listToMaybe, fromMaybe, maybeToList, catMaybes, isJust)
4443import Text.Pandoc.ImageSize
4544import Control.Applicative ((<|>))
4645import System.FilePath.Glob
src/Text/Pandoc/Writers/Powerpoint/Presentation.hs−1
@@ -60,7 +60,6 @@ import Text.Pandoc.Writers.Shared (lookupMetaInlines, lookupMetaBlocks
6060 , toLegacyTable)
6161import qualified Data.Map as M
6262import qualified Data.Set as S
63−import Data.Maybe (maybeToList, fromMaybe)
6463import Text.Pandoc.Highlighting
6564import qualified Data.Text as T
6665import Control.Applicative ((<|>))
src/Text/Pandoc/Writers/RST.hs−1
@@ -17,7 +17,6 @@ module Text.Pandoc.Writers.RST ( writeRST, flatten ) where
1717import Control.Monad.State.Strict
1818import Data.Char (isSpace)
1919import Data.List (transpose, intersperse, foldl')
20−import Data.Maybe (fromMaybe)
2120import qualified Data.Text as T
2221import Data.Text (Text)
2322import qualified Text.Pandoc.Builder as B
src/Text/Pandoc/Writers/Roff.hs−1
@@ -26,7 +26,6 @@ import qualified Data.Map as Map
2626import Data.Text (Text)
2727import qualified Data.Text as Text
2828import Data.String
29−import Data.Maybe (fromMaybe, isJust, catMaybes)
3029import Text.Pandoc.Class.PandocMonad (PandocMonad)
3130import Text.Pandoc.Definition
3231import Text.DocLayout
src/Text/Pandoc/Writers/Shared.hs−1
@@ -39,7 +39,6 @@ module Text.Pandoc.Writers.Shared (
3939where
4040import Safe (lastMay)
4141import qualified Data.ByteString.Lazy as BL
42−import Data.Maybe (fromMaybe, isNothing)
4342import Control.Monad (zipWithM)
4443import Data.Aeson (ToJSON (..), encode)
4544import Data.Char (chr, ord, isSpace)
src/Text/Pandoc/Writers/ZimWiki.hs−1
@@ -22,7 +22,6 @@ import Data.Default (Default (..))
2222import Data.List (transpose)
2323import qualified Data.Map as Map
2424import Text.DocLayout (render, literal)
25−import Data.Maybe (fromMaybe)
2625import Data.Text (Text)
2726import qualified Data.Text as T
2827import Text.Pandoc.Class.PandocMonad (PandocMonad, report)
src/Text/Pandoc/XML/Light.hs−1
@@ -44,7 +44,6 @@ import Text.XML.Unresolved (InvalidEventStream(..))
4444import qualified Data.Text as T
4545import qualified Data.Text.Lazy as TL
4646import qualified Data.Map as M
47−import Data.Maybe (mapMaybe)
4847import Text.Pandoc.XML.Light.Types
4948import Text.Pandoc.XML.Light.Proc
5049import Text.Pandoc.XML.Light.Output
src/Text/Pandoc/XML/Light/Proc.hs−1
@@ -37,7 +37,6 @@ module Text.Pandoc.XML.Light.Proc
3737 ) where
3838
3939import Data.Text (Text)
40−import Data.Maybe (listToMaybe)
4140import Data.List(find)
4241import Text.Pandoc.XML.Light.Types
4342
test/Tests/Readers/Docx.hs−1
@@ -17,7 +17,6 @@ import qualified Data.ByteString as BS
1717import qualified Data.ByteString.Lazy as B
1818import qualified Data.Map as M
1919import qualified Data.Text as T
20−import Data.Maybe
2120import System.IO.Unsafe
2221import Test.Tasty
2322import Test.Tasty.HUnit
test/Tests/Writers/OOXML.hs−1
@@ -12,7 +12,6 @@ import qualified Data.ByteString as BS
1212import qualified Data.ByteString.Lazy as BL
1313import qualified Data.Text.IO as T
1414import Data.List (isSuffixOf, sort, (\\), intercalate, union)
15−import Data.Maybe (catMaybes, mapMaybe)
1615import Tests.Helpers
1716import Data.Algorithm.Diff
1817import System.FilePath.Glob (compile, match)