anchor.diff:                                          ;else
              (let ((library (find-cld-library (library-name dependency) nil)))
                (if library
  -                 (let ((library-version
  -                        (if (library-version dependency)
  -                            (find-cld-library-version
  +		 (let ((dependency-library-version
  +			(if (library-version dependency)
  +			    (find-cld-library-version
                                library
                                (library-version dependency))
  -                                        ; else, use the latest version
  -                            (first (library-versions library)))))
  -                   (cons library-version
  -                         (calculate-library-versions library-version (cons dependency visited))))
  +                            ;; else, use a generic library version
  +			    ;; assuming the dependencies of the latest library version
  +			    (let ((latest-library-version (first (library-versions library))))
  +			      (make-instance 'cld-library-version
  +					     :library library
  +					     :version nil ;; This is important
  +					     :dependencies (dependencies latest-library-version)
  +					     :repositories (repositories latest-library-version))))))			    
  +		   (cons dependency-library-version
  +			 (calculate-library-versions dependency-library-version
  +						     (cons dependency visited))))
                                           ;else
  -                 (verbose-msg "WARNING: no ASDF system is being loaded by CLDM for ~A~%"
  -                              dependency))))))
  +                 (warn "No ASDF system is being loaded by CLDM for ~A~%"
  +		       dependency))))))
   
   (defun validate-library-versions-list (versions-list)
     (loop for i from 0 to (1- (length versions-list))
  
positive.code:                                (verbose-msg "~A cld found in ~A~%"
                                              (library-name dependency)
                                              cld-repository))))
                       (when cld
                         (load-dependency-cld dependency cld)))
                                          ;else
                     (load-dependency-cld dependency cld)))))
      (loop for dependency in (dependencies library-version)
         do (progn
              (verbose-msg "Handling ~A.~%" dependency)
              (if (find-cld-library (library-name dependency) nil)
                  (progn
                    (verbose-msg "Metadata for ~A is already loaded~%" (library-name dependency))
  
negative.code:         ;; Validate the library versions list
          (validate-library-versions-list library-versions)
  
          ;; Pick library versions
          (setf library-versions
                (pick-library-versions library-versions))
  
  	(verbose-msg "Libraries to load: ~A~%" library-versions)
  
  