We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent b346ab4 commit 96d65dcCopy full SHA for 96d65dc
1 file changed
app/Main.hs
@@ -10,6 +10,8 @@ import System.Directory
10
import System.FilePath
11
import Data.Conduit.Shell hiding (info)
12
import System.Environment (getArgs, withArgs)
13
+import Paths_tldr (version)
14
+import Data.Version (showVersion)
15
16
data TldrOpts = TldrOpts
17
{ pageName :: String
@@ -65,7 +67,7 @@ tldrParserInfo =
65
67
where
66
68
versionOption :: Parser (a -> a)
69
versionOption =
- infoOption "0.1" (long "version" <> short 'v' <> help "Show version")
70
+ infoOption (showVersion version) (long "version" <> short 'v' <> help "Show version")
71
72
programOptions :: Parser TldrOpts
73
programOptions =
0 commit comments