Commit 0f39a769 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Refuse to register packages with unversioned dependencies; trac #1837

parent f6a9dff6
......@@ -519,6 +519,11 @@ registerPackage input my_flags auto_ghci_libs update force = do
pkg <- parsePackageInfo expanded
putStrLn "done."
let unversioned_deps = filter (not . realVersion) (depends pkg)
unless (null unversioned_deps) $
die ("Unversioned dependencies found: " ++
unwords (map display unversioned_deps))
let truncated_stack = dropWhile ((/= to_modify).fst) db_stack
-- truncate the stack for validation, because we don't allow
-- packages lower in the stack to refer to those higher up.
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment