af8fb5e · typeable/pandoc

git.iko.soy/typeable/pandoc

Removed unneeded imports.

commitaf8fb5e792aad81a0636948268cedb1a0dae529f authorJohn MacFarlane <jgm@berkeley.edu> dateSat 26 Sep 2015, 22:56 (11 years ago) parent6532950

2 files changed+2−3

unifiedsplit

src/Text/Pandoc/MediaBag.hs−1

@@ -41,7 +41,6 @@ import qualified System.FilePath.Posix as Posix

4141import System.Directory (createDirectoryIfMissing)

4242import qualified Data.Map as M

4343import qualified Data.ByteString.Lazy as BL

44−import Data.List (intercalate)

4544import Data.Monoid (Monoid)

4645import Control.Monad (when)

4746import Text.Pandoc.MIME (MimeType, getMimeTypeDef)

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

@@ -111,7 +111,7 @@ import Network.URI ( escapeURIString, isURI, nonStrictRelativeTo,

111111 unEscapeString, parseURIReference, isAllowedInURI )

112112import qualified Data.Set as Set

113113import System.Directory

114−import System.FilePath (joinPath, splitDirectories, isPathSeparator)

114+import System.FilePath (splitDirectories, isPathSeparator)

115115import qualified System.FilePath.Posix as Posix

116116import Text.Pandoc.MIME (MimeType, getMimeType)

117117import System.FilePath ( (</>), takeExtension, dropExtension)

@@ -833,7 +833,7 @@ readDefaultDataFile fname =

833833 case lookup (makeCanonical fname) dataFiles of

834834 Nothing -> err 97 $ "Could not find data file " ++ fname

835835 Just contents -> return contents

836− where makeCanonical = joinPath . transformPathParts . splitDirectories

836+ where makeCanonical = Posix.joinPath . transformPathParts . splitDirectories

837837 transformPathParts = reverse . foldl go []

838838 go as "." = as

839839 go (_:as) ".." = as