committed by
Wolfgang Walther
parent
9c6597c351
commit
bbc07d3f40
@@ -30,10 +30,12 @@ prettyVersion =
|
|||||||
|
|
||||||
|
|
||||||
-- | Version number used in docs.
|
-- | Version number used in docs.
|
||||||
|
-- Pre-release versions link to the latest docs
|
||||||
-- Uses only the two first components of the version. Example: 'v1.1'
|
-- Uses only the two first components of the version. Example: 'v1.1'
|
||||||
docsVersion :: Text
|
docsVersion :: Text
|
||||||
docsVersion =
|
docsVersion
|
||||||
"v" <> (T.intercalate "." . map show . take 2 $ versionBranch version)
|
| isPreRelease = "latest"
|
||||||
|
| otherwise = "v" <> (T.intercalate "." . map show . take 2 $ versionBranch version)
|
||||||
|
|
||||||
|
|
||||||
-- | Versions with four components (e.g., '1.1.1.1') are treated as pre-releases.
|
-- | Versions with four components (e.g., '1.1.1.1') are treated as pre-releases.
|
||||||
|
|||||||
Reference in New Issue
Block a user