From fc3a2e03c11d79b3935133757fca708be2c9db72 Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Mon, 14 Apr 2014 14:50:34 -0400 Subject: [PATCH] Fix bug in my previous fix to detect-os. --- uiop/os.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/uiop/os.lisp b/uiop/os.lisp index 24743a32..d90e1abb 100644 --- a/uiop/os.lisp +++ b/uiop/os.lisp @@ -68,7 +68,7 @@ except on ABCL where it might change between FASL compilation and runtime." (:genera . os-genera-p) (:os-oldmac . os-oldmac-p)) :when (and (or (not o) (eq feature :os-macosx)) (funcall detect)) :do (setf o feature) (pushnew feature *features*) - :else :do (remove feature *features*) + :else :do (setf *features* (remove feature *features*)) :finally (return (or o (error "Congratulations for trying ASDF on an operating system~%~ that is neither Unix, nor Windows, nor Genera, nor even old MacOS.~%Now you port it."))))) -- GitLab