From d1e4d00b8d96f4875f8c82b0087c562fda7bcca7 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 25 Apr 2025 08:26:14 -1000
Subject: [PATCH] lib: Cli,UI,WebOptions: export binaryinfo

---
 hledger-ui/Hledger/UI/UIOptions.hs    | 3 +++
 hledger-web/Hledger/Web/WebOptions.hs | 3 +++
 hledger/Hledger/Cli/CliOptions.hs     | 4 ++++
 3 files changed, 10 insertions(+)

diff --git a/hledger-ui/Hledger/UI/UIOptions.hs b/hledger-ui/Hledger/UI/UIOptions.hs
index 1b106e218..3eccd7a6c 100644
--- a/hledger-ui/Hledger/UI/UIOptions.hs
+++ b/hledger-ui/Hledger/UI/UIOptions.hs
@@ -41,6 +41,9 @@ prognameandversion =
   progname
   packageversion
 
+binaryinfo :: HledgerBinaryVersion
+Right binaryinfo = parseHledgerVersion prognameandversion
+
 
 uiflags = [
    flagNone ["watch","w"] (setboolopt "watch") "watch for data and date changes and reload automatically"
diff --git a/hledger-web/Hledger/Web/WebOptions.hs b/hledger-web/Hledger/Web/WebOptions.hs
index 0cf9ac187..ab984909a 100644
--- a/hledger-web/Hledger/Web/WebOptions.hs
+++ b/hledger-web/Hledger/Web/WebOptions.hs
@@ -52,6 +52,9 @@ prognameandversion =
   progname
   packageversion
 
+binaryinfo :: HledgerBinaryVersion
+Right binaryinfo = parseHledgerVersion prognameandversion
+
 webflags :: [Flag RawOpts]
 webflags =
   [ flagNone
diff --git a/hledger/Hledger/Cli/CliOptions.hs b/hledger/Hledger/Cli/CliOptions.hs
index a3c777bc4..d7a028d44 100644
--- a/hledger/Hledger/Cli/CliOptions.hs
+++ b/hledger/Hledger/Cli/CliOptions.hs
@@ -18,6 +18,7 @@ related utilities used by hledger commands.
 module Hledger.Cli.CliOptions (
   progname,
   prognameandversion,
+  binaryinfo,
 
   -- * cmdargs flags & modes
   inputflags,
@@ -138,6 +139,9 @@ prognameandversion =
   progname
   packageversion
 
+binaryinfo :: HledgerBinaryVersion
+Right binaryinfo = parseHledgerVersion prognameandversion
+
 -- Common options.
 -- keep synced: the docs macro in doc/common.m4