yogsototh/stackage-server
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

prettyprint "(GHC version)" as "(ghc-version)"

Browse source
This commit is contained in:
Jens Petersen 2016-02-19 19:57:35 +09:00
parent 0af19eed1c
commit b577b75774
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Stackage/Database.hs
View file

@ -470,7 +470,7 @@ snapshotTitle :: Snapshot -> Text
snapshotTitle s = prettyName (snapshotName s) (snapshotGhc s)
prettyName :: SnapName -> Text -> Text
prettyName name ghc = concat [prettyNameShort name, " (GHC ", ghc, ")"]
prettyName name ghc = concat [prettyNameShort name, " (ghc-", ghc, ")"]
prettyNameShort :: SnapName -> Text
prettyNameShort name =