From b575ccb31c9cf10c94bb7851f2427e3bba1cd2b6 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <fare@tunes.org>
Date: Thu, 4 Feb 2010 02:13:41 -0500
Subject: [PATCH] 1.601: fix a typo that broke lispworks.

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

diff --git a/asdf.lisp b/asdf.lisp
index fffa42cc..e03b06da 100644
--- a/asdf.lisp
+++ b/asdf.lisp
@@ -187,7 +187,7 @@
 ;;;;
 (defparameter *asdf-version*
   ;; the 1+ hair is to ensure that we don't do an inadvertent find and replace
-  (subseq "VERSION:1.600" (1+ (length "VERSION"))))
+  (subseq "VERSION:1.601" (1+ (length "VERSION"))))
 
 (defun asdf-version ()
   *asdf-version*)
@@ -438,7 +438,7 @@ and NIL NAME and TYPE components" ;;; what about VERSION???
   #+cmu
   (cdr (assoc (intern x :keyword) ext:*environment-list*))
   #+lispworks
-  (lispworks:environment-xiable x)
+  (lispworks:environment-variable x)
   #+allegro
   (sys:getenv x)
   #+gcl
-- 
GitLab