From 07ad7337f6d416b3db44c56de3c96f15fb797fa2 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <fare@tunes.org>
Date: Tue, 2 Feb 2010 20:37:31 -0500
Subject: [PATCH] 1.594: Yet another fix. Specify where to unexport from.

---
 asdf.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/asdf.lisp b/asdf.lisp
index be17308a..b214520c 100644
--- a/asdf.lisp
+++ b/asdf.lisp
@@ -53,7 +53,7 @@
     (when asdf
       (let ((sym (find-symbol "*ASDF-REVISION*" asdf)))
         (when sym
-          (unexport sym)
+          (unexport sym asdf)
           (unintern sym))))))
 
 (defpackage #:asdf
@@ -175,7 +175,7 @@
 ;;;;
 (defparameter *asdf-version*
   ;; the 1+ hair is to ensure that we don't do an inadvertent find and replace
-  (subseq "VERSION:1.593" (1+ (length "VERSION"))))
+  (subseq "VERSION:1.594" (1+ (length "VERSION"))))
 
 (defun asdf-version ()
   *asdf-version*)
-- 
GitLab