Commit 7db34d29 authored by Robert P. Goldman's avatar Robert P. Goldman

Fix default behavior of VERSION-SATISFIES.

Previously, if a component's version slot was unbound, it would match
*all* version specifications.  This is obviously wrong, because it means
you can't detect when a system goes from unversioned to versioned.
Changed this to an interpretation that an unbound version slot matches
NO version specifications.
parent 0117d8ca
......@@ -276,7 +276,7 @@ children.")))
(unless (and version (slot-boundp c 'version) (component-version c))
(when version
(warn "Requested version ~S but ~S has no version" version c))
(return-from version-satisfies t))
(return-from version-satisfies nil))
(version-satisfies (component-version c) version))
(defmethod version-satisfies ((cver string) version)
Markdown is supported
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