slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

lib: parseHledgerVersion: also save the package version as text

Browse Source
This commit is contained in:
Simon Michael 2025-04-23 11:00:49 -10:00
parent cd6288a8eb
commit 6cf40a76d1
1 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
hledger/Hledger/Cli/Version.hs
View File

@ -89,13 +89,14 @@ type GitHash = String
-- intended operating machine and machine architecture, if we can detect these. -- intended operating machine and machine architecture, if we can detect these.
-- Also, a copy of the --version output from which it was parsed. -- Also, a copy of the --version output from which it was parsed.
data HledgerBinaryVersion = HledgerBinaryVersion { data HledgerBinaryVersion = HledgerBinaryVersion {
hbinVersionOutput :: String hbinVersionOutput :: String
, hbinProgramName :: ProgramName , hbinProgramName :: ProgramName
, hbinPackageVersion :: Version , hbinPackageVersion :: Version
, hbinGitHash :: Maybe GitHash , hbinPackageVersionStr :: String
, hbinReleaseDate :: Maybe Day , hbinGitHash :: Maybe GitHash
, hbinOs :: Maybe OsName , hbinReleaseDate :: Maybe Day
, hbinArch :: Maybe ArchName , hbinOs :: Maybe OsName
, hbinArch :: Maybe ArchName
} deriving (Show, Eq) } deriving (Show, Eq)
type Parser = Parsec Void String type Parser = Parsec Void String
@ -147,6 +148,7 @@ hledgerversionp = do
{ hbinVersionOutput = "" { hbinVersionOutput = ""
, hbinProgramName = progName , hbinProgramName = progName
, hbinPackageVersion = pkgversion , hbinPackageVersion = pkgversion
, hbinPackageVersionStr = showVersion pkgversion
, hbinGitHash = mgithash , hbinGitHash = mgithash
, hbinReleaseDate = mreldate , hbinReleaseDate = mreldate
, hbinOs = mos , hbinOs = mos