diff options
| author | John MacFarlane <[email protected]> | 2022-10-19 09:11:34 -0700 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2022-10-19 09:16:13 -0700 |
| commit | fde8635a181a6ed0cec2a1756fc3e35fee39d29d (patch) | |
| tree | 46180c54701e1267afd69ad61d5f1ee36741c2a0 /src/Text/Pandoc/Shared.hs | |
| parent | 4bf685e7ebc5255ab985b9886c88915c0feb8b61 (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.hs | 13 |
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 -- |
