From 2a1e772ace58c75f5a382a37618b177467bce73e Mon Sep 17 00:00:00 2001
From: Zachary Snow <zach@zachjs.com>
Date: Sun, 31 May 2020 22:29:19 -0400
Subject: [PATCH] use git describe for version summary

---
 src/Job.hs | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/src/Job.hs b/src/Job.hs
index 44fed837..8a047970 100644
--- a/src/Job.hs
+++ b/src/Job.hs
@@ -8,7 +8,7 @@
 
 module Job where
 
-import GitHash (giHash, tGitInfoCwd)
+import GitHash (giDescribe, tGitInfoCwd)
 import System.IO (stderr, hPutStr)
 import System.Console.CmdArgs
 import System.Environment (getArgs, withArgs)
@@ -31,11 +31,6 @@ data Job = Job
     , verbose :: Bool
     } deriving (Show, Typeable, Data)
 
-gitHash :: String
-gitHash = giHash $$tGitInfoCwd
-shortGitHash :: String
-shortGitHash = take 7 gitHash
-
 defaultJob :: Job
 defaultJob = Job
     { files = def &= args &= typ "FILES"
@@ -54,7 +49,7 @@ defaultJob = Job
     , verbose = nam "verbose" &= help "Retain certain conversion artifacts"
     }
     &= program "sv2v"
-    &= summary ("sv2v v0.0.4 (" ++ shortGitHash ++ ")")
+    &= summary ("sv2v " ++ giDescribe $$tGitInfoCwd)
     &= details [ "sv2v converts SystemVerilog to Verilog."
                , "More info: https://github.com/zachjs/sv2v"
                , "(C) 2019-2020 Zachary Snow, 2011-2015 Tom Hawkins" ]