diff --git a/asdf.lisp b/asdf.lisp index d5c1bdcfc9b9cbd56ffc073af46402be8c54b262..49cfc2c2bdf8299c55472e68be3d747b80cfd674 100644 --- a/asdf.lisp +++ b/asdf.lisp @@ -68,7 +68,7 @@ ;;;; Create packages in a way that is compatible with hot-upgrade. ;;;; See https://bugs.launchpad.net/asdf/+bug/485687 -;;;; See more at the end of the file. +;;;; See more near the end of the file. (eval-when (:load-toplevel :compile-toplevel :execute) (defvar *asdf-version* nil) @@ -76,8 +76,9 @@ (let* (;; For bug reporting sanity, please always bump this version when you modify this file. ;; "2.345" would be an official release ;; "2.345.6" would be a development version in the official upstream - ;; "2.345.0.7" or "2.345.6.7" would be your local modification of one of the above. - (asdf-version "2.010.9") + ;; "2.345.0.7" would be your local modification of an official release + ;; "2.345.6.7" would be your local modification of a development version + (asdf-version "2.011") (existing-asdf (fboundp 'find-system)) (existing-version *asdf-version*) (already-there (equal asdf-version existing-version))) @@ -294,7 +295,7 @@ ;; Utilities #:absolute-pathname-p - ;; #:aif #:it + ;; #:aif #:it ;; #:appendf #:coerce-name #:directory-pathname-p @@ -307,8 +308,8 @@ #:merge-pathnames* #:pathname-directory-pathname #:read-file-forms - ;; #:remove-keys - ;; #:remove-keyword + ;; #:remove-keys + ;; #:remove-keyword #:resolve-symlinks #:split-string #:component-name-to-pathname-components @@ -633,7 +634,7 @@ actually-existing directory." (defun* get-uid () #+allegro (excl.osi:getuid) #+clisp (loop :for s :in '("posix:uid" "LINUX:getuid") - :for f = (ignore-errors (read-from-string s)) + :for f = (ignore-errors (read-from-string s)) :when f :return (funcall f)) #+(or cmu scl) (unix:unix-getuid) #+ecl #.(cl:if (cl:< ext:+ecl-version-number+ 100601) @@ -667,7 +668,7 @@ with given pathname and if it exists return its truename." (pathname (unless (wild-pathname-p p) #.(or #+(or allegro clozure cmu ecl sbcl scl) '(probe-file p) #+clisp (aif (find-symbol (string '#:probe-pathname) :ext) `(ignore-errors (,it p))) - '(ignore-errors (truename p))))))) + '(ignore-errors (truename p))))))) (defun* truenamize (p) "Resolve as much of a pathname as possible" @@ -1333,7 +1334,7 @@ Going forward, we recommend new users should be using the source-registry. (let* ((registered (cdr (gethash fallback *defined-systems*))) (system (or registered (apply 'make-instance 'system - :name fallback :source-file source-file keys)))) + :name fallback :source-file source-file keys)))) (unless registered (register-system fallback system)) (throw 'find-system system)))) diff --git a/debian/changelog b/debian/changelog index c795902e14b17f30d54f376a34b3243a613cf1b1..f4870372305de28f96eacd8cf4e21d5adfe7480e 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,14 @@ +cl-asdf (2:2.011-1) unstable; urgency=low + + * Mostly same as 2.010.9: several minor tweaks and bug fixes since 2.010. + * Will be happier: users of implementations ACL, GCL; users of libraries + CL-Launch, XCVB; future former users of ASDF-Binary-Locations; people + with missing dependencies (in lieu of error-in-error); people extending + ASDF (notably Stelian Ionescu), who'd like to use keywords to name + component classes. + + -- Francois-Rene Rideau <fare@tunes.org> Sun, 28 Nov 2010 13:21:34 -0500 + cl-asdf (2:2.010-1) unstable; urgency=low * same as 2.146 diff --git a/doc/index.html b/doc/index.html index 823f0d917defc2c65afe78a5ef0be3d84ac6b752..5501b6d51c84b8eee5609448420bd0e559bad42f 100644 --- a/doc/index.html +++ b/doc/index.html @@ -43,6 +43,12 @@ <p>ASDF stands for <em>A</em>nother <em>S</em>ystem <em>D</em>efinition <em>F</em>acility, in the continuity of the Lisp DEFSYSTEM of yore. </p> + <a id="what_it_is_not"></a> + <h3>What it is not</h3> + <p>ASDF will not download missing software components for you. + For that, you want <a href="http://quicklisp.org/">quicklisp</a>. + (quicklisp builds upon ASDF.) + </p> <a id="documentation"></a> <h3>Documentation</h3> <p>You can read our manual:</p>