d474852 · typeable/pandoc

git.iko.soy/typeable/pandoc

Removed unnecessary imports.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1189 788f1e2b-df1e-0410-8736-df70ead52e1b

commitd474852f56467456587d6793421b1e7586a3159f authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> dateWed 16 Jan 2008, 02:18 (19 years ago) parent155ef83

8 files changed+6−12

compare with master

unifiedsplit

Main.hs−1 Text/Pandoc/Readers/HTML.hs+2−3 Text/Pandoc/Readers/TeXMath.hs−2 Text/Pandoc/Writers/ConTeXt.hs+1−1 Text/Pandoc/Writers/LaTeX.hs+1−1 Text/Pandoc/Writers/Man.hs+1−2 Text/Pandoc/Writers/Markdown.hs+1−1 Text/Pandoc/Writers/RST.hs−1

Main.hs−1

@@ -38,7 +38,6 @@ import System.Exit ( exitWith, ExitCode (..) )

3838import System.Console.GetOpt

3939import System.IO

4040import Data.Maybe ( fromMaybe )

41−import Data.List ( isPrefixOf )

4241import Data.Char ( toLower )

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

4443

Text/Pandoc/Readers/HTML.hs+2−3

@@ -43,11 +43,10 @@ module Text.Pandoc.Readers.HTML (

4343import Text.ParserCombinators.Parsec

4444import Text.Pandoc.Definition

4545import Text.Pandoc.Shared

46−import Text.Pandoc.CharacterReferences ( characterReference,

47− decodeCharacterReferences )

46+import Text.Pandoc.CharacterReferences ( decodeCharacterReferences )

4847import Data.Maybe ( fromMaybe )

4948import Data.List ( takeWhile, dropWhile, isPrefixOf, isSuffixOf )

50−import Data.Char ( toUpper, toLower, isAlphaNum )

49+import Data.Char ( toLower, isAlphaNum )

5150

5251-- | Convert HTML-formatted string to 'Pandoc' document.

5352readHtml :: ParserState -- ^ Parser state

Text/Pandoc/Readers/TeXMath.hs−2

@@ -32,9 +32,7 @@ module Text.Pandoc.Readers.TeXMath (

3232 ) where

3333

3434import Text.ParserCombinators.Parsec

35−import Text.Pandoc.UTF8

3635import Text.Pandoc.Definition

37−import Text.Pandoc.Shared

3836

3937-- | Converts a string of raw TeX math to a list of 'Pandoc' inlines.

4038readTeXMath :: String -> [Inline]

Text/Pandoc/Writers/ConTeXt.hs+1−1

@@ -31,7 +31,7 @@ module Text.Pandoc.Writers.ConTeXt ( writeConTeXt ) where

3131import Text.Pandoc.Definition

3232import Text.Pandoc.Shared

3333import Text.Printf ( printf )

34−import Data.List ( (\\), intersperse, isSuffixOf )

34+import Data.List ( isSuffixOf )

3535import Control.Monad.State

3636import Text.PrettyPrint.HughesPJ hiding ( Str )

3737

Text/Pandoc/Writers/LaTeX.hs+1−1

@@ -31,7 +31,7 @@ module Text.Pandoc.Writers.LaTeX ( writeLaTeX ) where

3131import Text.Pandoc.Definition

3232import Text.Pandoc.Shared

3333import Text.Printf ( printf )

34−import Data.List ( (\\), isInfixOf, isSuffixOf, intersperse )

34+import Data.List ( (\\), isSuffixOf )

3535import Data.Char ( toLower )

3636import qualified Data.Set as S

3737import Control.Monad.State

Text/Pandoc/Writers/Man.hs+1−2

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

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

3232import Text.Pandoc.Definition

3333import Text.Pandoc.Shared

34−import Text.Pandoc.Readers.TeXMath

3534import Text.Printf ( printf )

3635import Data.List ( isPrefixOf, drop, nub, intersperse )

3736import Text.PrettyPrint.HughesPJ hiding ( Str )

@@ -79,7 +78,7 @@ metaToMan options (Meta title authors date) = do

7978 let foot = case length authors of

8079 0 -> empty

8180 1 -> text ".SH AUTHOR" $$ (text $ joinWithSep ", " authors)

82− 2 -> text ".SH AUTHORS" $$ (text $ joinWithSep ", " authors)

81+ _ -> text ".SH AUTHORS" $$ (text $ joinWithSep ", " authors)

8382 return $ if writerStandalone options

8483 then (head, foot)

8584 else (empty, empty)

Text/Pandoc/Writers/Markdown.hs+1−1

@@ -33,7 +33,7 @@ module Text.Pandoc.Writers.Markdown ( writeMarkdown) where

3333import Text.Pandoc.Definition

3434import Text.Pandoc.Shared

3535import Text.Pandoc.Blocks

36−import Text.ParserCombinators.Parsec ( parse, (<|>), GenParser )

36+import Text.ParserCombinators.Parsec ( parse, GenParser )

3737import Data.List ( group, isPrefixOf, drop, find, intersperse )

3838import Text.PrettyPrint.HughesPJ hiding ( Str )

3939import Control.Monad.State

Text/Pandoc/Writers/RST.hs−1

@@ -32,7 +32,6 @@ reStructuredText: <http://docutils.sourceforge.net/rst.html>

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

3333import Text.Pandoc.Definition

3434import Text.Pandoc.Shared

35−import Text.Pandoc.Readers.TeXMath

3635import Text.Pandoc.Blocks

3736import Data.List ( isPrefixOf, isSuffixOf, drop, intersperse )

3837import Text.PrettyPrint.HughesPJ hiding ( Str )