diff options
-rw-r--r-- | src/Text/Pandoc/Shared.hs | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index cf92a1fda..215fbfde1 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -87,8 +87,6 @@ module Text.Pandoc.Shared ( defaultBlocksSeparator, -- * Safe read safeRead, - -- * Temp directory - withTempDir, -- * User data directory defaultUserDataDirs, -- * Version @@ -119,7 +117,6 @@ import Paths_pandoc (version) import System.Directory import System.FilePath (isPathSeparator, splitDirectories) import qualified System.FilePath.Posix as Posix -import System.IO.Temp import Text.HTML.TagSoup (RenderOptions (..), Tag (..), renderOptions, renderTagsOptions) import Text.Pandoc.Builder (Blocks, Inlines, ToMetaValue (..)) @@ -899,20 +896,6 @@ safeRead s = case reads s of _ -> mzero -- --- Temp directory --- - --- TODO remove in next major release; this is no longer --- used in the code base. -withTempDir :: String -> (FilePath -> IO a) -> IO a -withTempDir = -#ifdef _WINDOWS - withTempDirectory "." -#else - withSystemTempDirectory -#endif - --- -- User data directory -- |