aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Shared.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2022-10-19 09:11:34 -0700
committerJohn MacFarlane <[email protected]>2022-10-19 09:16:13 -0700
commitfde8635a181a6ed0cec2a1756fc3e35fee39d29d (patch)
tree46180c54701e1267afd69ad61d5f1ee36741c2a0 /src/Text/Pandoc/Shared.hs
parent4bf685e7ebc5255ab985b9886c88915c0feb8b61 (diff)
Split Text.Pandoc.Version from Text.Pandoc.Shared.
This new module exports `pandocVersion` and `pandocVersionText`, which are no longer exported from Text.Pandoc.Shared. [API change] Also, we now set the `pandoc-version` variable centrally rather than in the writers. One effect is the man writer now emits a comment with the pandoc version (this was intended before, judging from the template, but it didn't happen because the vairable wasn't set).
Diffstat (limited to 'src/Text/Pandoc/Shared.hs')
-rw-r--r--src/Text/Pandoc/Shared.hs13
1 files changed, 0 insertions, 13 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs
index 0a836847b..b2d14c52a 100644
--- a/src/Text/Pandoc/Shared.hs
+++ b/src/Text/Pandoc/Shared.hs
@@ -88,9 +88,6 @@ module Text.Pandoc.Shared (
safeStrRead,
-- * User data directory
defaultUserDataDir,
- -- * Version
- pandocVersion,
- pandocVersionText
) where
import Codec.Archive.Zip
@@ -110,8 +107,6 @@ import Data.Monoid (Any (..))
import Data.Sequence (ViewL (..), ViewR (..), viewl, viewr)
import qualified Data.Set as Set
import qualified Data.Text as T
-import Data.Version (Version, showVersion)
-import Paths_pandoc (version)
import System.Directory
import System.FilePath (isPathSeparator, splitDirectories)
import qualified System.FilePath.Posix as Posix
@@ -127,14 +122,6 @@ import Text.Pandoc.Generic (bottomUp)
import Text.DocLayout (charWidth)
import Text.Pandoc.Walk
--- | Version number of pandoc library.
-pandocVersion :: Version
-pandocVersion = version
-
--- | Text representation of the library's version number.
-pandocVersionText :: T.Text
-pandocVersionText = T.pack $ showVersion version
-
--
-- List processing
--