diff --git a/Stackage/Database.hs b/Stackage/Database.hs
index a6ef073..89728c6 100644
--- a/Stackage/Database.hs
+++ b/Stackage/Database.hs
@@ -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 =