Skip to content
Snippets Groups Projects
Commit 7db34d29 authored by Robert P. Goldman's avatar Robert P. Goldman
Browse files

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
No related branches found
No related tags found
No related merge requests found
......@@ -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)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment