diff --git a/component.lisp b/component.lisp
index ac1c206dc7c12588c7dd0f25b8229c36396fdb76..e023646f602c71a912292d18f67fb3fb82d955a2 100644
--- a/component.lisp
+++ b/component.lisp
@@ -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)