Workaround for non-present base

This commit is contained in:
Michael Snoyman 2014-12-24 09:07:08 +02:00
parent 7ac0fd8dbc
commit a7254a0140

View File

@ -213,6 +213,7 @@ putUploadStackageR = do
]
msrc <- storeRead (HackageCabal name version)
case msrc of
Nothing | name == "base" -> return () -- workaround in case base isn't uploaded to Hackage
Nothing -> invalidArgs ["Unknown Hackage name/version: " ++ tshow (name, version)]
Just src -> addFile False name version src