Commit 4410bae9 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau

2.013.1: Fix upgrade issue when dealing with package change.

Found while using GCL on Debian running 2.004, but should affect
any implementation upgrading from ASDF earlier than 2.009 or so. Oops.
parent ad45e42d
......@@ -12,7 +12,7 @@
:licence "MIT"
:description "Another System Definition Facility"
:long-description "ASDF builds Common Lisp software organized into defined systems."
:version "2.013" ;; to be automatically updated by bin/bump-revision
:version "2.013.1" ;; to be automatically updated by bin/bump-revision
:depends-on ()
:components
((:file "asdf")
......
;;; -*- mode: common-lisp; Base: 10 ; Syntax: ANSI-Common-Lisp -*-
;;; This is ASDF 2.013: Another System Definition Facility.
;;; This is ASDF 2.013.1: Another System Definition Facility.
;;;
;;; Feedback, bug reports, and patches are all welcome:
;;; please mail to <asdf-devel@common-lisp.net>.
......@@ -83,7 +83,7 @@
;; "2.345.6" would be a development version in the official upstream
;; "2.345.0.7" would be your seventh local modification of official release 2.345
;; "2.345.6.7" would be your seventh local modification of development version 2.345.6
(asdf-version "2.013")
(asdf-version "2.013.1")
(existing-asdf (fboundp 'find-system))
(existing-version *asdf-version*)
(already-there (equal asdf-version existing-version)))
......@@ -94,7 +94,7 @@
existing-version asdf-version))
(labels
((present-symbol-p (symbol package)
(member (nth-value 1 (find-symbol symbol package)) '(:internal :external)))
(member (nth-value 1 (find-sym symbol package)) '(:internal :external)))
(present-symbols (package)
;; #-genera (loop :for s :being :the :present-symbols :in package :collect s) #+genera
(let (l)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment