currentVersionInfoStr :: String
currentVersionInfoStr =
    concat
    [ "Lamdu ", version
    , "\n  built from git revision: ", gitCommit
    , statusLine
    ]
    where
        statusLine
            | null gitStatus = ""
            | otherwise = "\n  status:" ++ gitStatus
        VersionInfo{version, gitCommit, gitStatus} = currentVersionInfo
currentVersionInfoStr :: String
currentVersionInfoStr =
    concat
    [ "Lamdu ", version
    , "\n  built from git revision: ", gitCommit
    , statusLine
    ]
    where
        statusLine
            | null gitStatus = ""
            | otherwise = "\n  status:" ++ gitStatus
        VersionInfo{version, gitCommit, gitStatus} = currentVersionInfo
currentVersionInfoStr =
    concat
    [ "Lamdu ", version
    , "\n  built from git revision: ", gitCommit
    , statusLine
    ]
    where
        statusLine
            | null gitStatus = ""
            | otherwise = "\n  status:" ++ gitStatus
        VersionInfo{version, gitCommit, gitStatus} = currentVersionInfo