Mercurial > hg > xemacs-beta
comparison lisp/package-get.el @ 380:8626e4521993 r21-2-5
Import from CVS: tag r21-2-5
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:07:10 +0200 |
parents | d883f39b8495 |
children | 064ab7fed2e0 |
comparison
equal
deleted
inserted
replaced
379:76b7d63099ad | 380:8626e4521993 |
---|---|
607 (this-requires (package-get-info-prop this-package 'requires)) | 607 (this-requires (package-get-info-prop this-package 'requires)) |
608 (new-depends (set-difference | 608 (new-depends (set-difference |
609 (mapcar | 609 (mapcar |
610 #'(lambda (reqd) | 610 #'(lambda (reqd) |
611 (let* ((reqd-package (package-get-package-provider reqd)) | 611 (let* ((reqd-package (package-get-package-provider reqd)) |
612 (reqd-version (cadr reqd-package)) | |
613 (reqd-name (car reqd-package))) | 612 (reqd-name (car reqd-package))) |
614 (if (null reqd-name) | 613 (if (null reqd-name) |
615 (error "Unable to find a provider for %s" reqd)) | 614 (error "Unable to find a provider for %s" reqd)) |
616 reqd-name)) | 615 reqd-name)) |
617 this-requires) | 616 this-requires) |