GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

updating formating for git info

Browse Source
This commit is contained in:
Herbert Lange
2025-08-08 17:43:56 +02:00
parent e0ad7594dd
commit 1c4cde7c66
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/compiler/GF/Infra/BuildInfo.hs
View File

@@ -22,7 +22,7 @@ buildTime = $(do
-- Use Template Haskell to get current Git information -- Use Template Haskell to get current Git information
gitInfo :: String gitInfo :: String
gitInfo = $(do gitInfo = $(do
info <- liftIO $ try $ readProcess "git" ["log", "--format=\"Commit %h Tag %(describe:tags=true)\"", "-1"] "" :: Q (Either SomeException String) info <- liftIO $ try $ readProcess "git" ["log", "--format=commit %h tag %(describe:tags=true)", "-1"] "" :: Q (Either SomeException String)
return $ LitE $ StringL $ either (\_ -> "unavailable") id info ) return $ LitE $ StringL $ either (\_ -> "unavailable") id info )
{-# NOINLINE buildInfo #-} {-# NOINLINE buildInfo #-}