Commit 1c741784 by Zachary Snow

use the tag alone as the version for future releases

parent 6082cae4
......@@ -12,7 +12,7 @@ import Control.Monad (when)
import Data.Char (toLower)
import Data.List (isPrefixOf, isSuffixOf)
import Data.Version (showVersion)
import GitHash (giDescribe, tGitInfoCwdTry)
import GitHash (giTag, tGitInfoCwdTry)
import qualified Paths_sv2v (version)
import System.IO (stderr, hPutStr)
import System.Console.CmdArgs
......@@ -54,7 +54,7 @@ data Job = Job
} deriving (Typeable, Data)
version :: String
version = either (const backup) giDescribe $$tGitInfoCwdTry
version = either (const backup) giTag $$tGitInfoCwdTry
where backup = showVersion Paths_sv2v.version
defaultJob :: Job
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment