Commit 07ad7337 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

1.594: Yet another fix. Specify where to unexport from.

parent 60b2baf9
Loading
Loading
Loading
Loading
+2 −2
Original line number Diff line number Diff line
@@ -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*)