@@ -490,7 +490,7 @@ convertGithubUser x =
490490 fromMaybe x $ Map.lookup (map toLower x) pairs
491491 where
492492 pairs = Map.fromList
493− [ ("diagrams", "diagrams/Core")
493+ [ ("diagrams", "byorgey")
494494 , ("yesodweb", "snoyberg")
495495 , ("fpco", "snoyberg")
496496 , ("faylang", "bergmark")