@@ -468,7 +468,7 @@ convertGithubUser x =
468 fromMaybe x $ Map.lookup (map toLower x) pairs
468 fromMaybe x $ Map.lookup (map toLower x) pairs
470 pairs = Map.fromList
470 pairs = Map.fromList
471− [ ("diagrams", "byorgey")
471+ [ ("diagrams", "diagrams/Core")
472 , ("yesodweb", "snoyberg")
472 , ("yesodweb", "snoyberg")
473 , ("fpco", "snoyberg")
473 , ("fpco", "snoyberg")
474 , ("faylang", "bergmark")
474 , ("faylang", "bergmark")