diff --git a/utils/clos-patches.lisp b/utils/clos-patches.lisp index f65ede0851205978db4f6ea9a02ab1cb20c99149..9fef6f058a477ff734578f93257035f8c19302e5 100644 --- a/utils/clos-patches.lisp +++ b/utils/clos-patches.lisp @@ -16,7 +16,7 @@ ;; Commercial Software developed at private expense as specified in ;; DOD FAR Supplement 52.227-7013 (c) (1) (ii), as applicable. ;; -;; $Id: clos-patches.lisp,v 1.17 2002/09/06 01:39:41 duane Exp $ +;; $Id: clos-patches.lisp,v 1.18 2003/05/29 00:20:08 duane Exp $ (in-package :clim-utils) @@ -45,10 +45,10 @@ #-(version>= 7 0) (or (eq environment 'compile-file) excl::*compiler-environment*) #+(version>= 7 0) - (or (and excl::*compile-file-environment* + (or (and sys::*compile-file-environment* (excl::compilation-environment-p environment) environment) - excl::*compile-file-environment*)) + sys::*compile-file-environment*)) #+(and allegro never-in-a-million-years) (eval-when (compile) diff --git a/utils/packages.lisp b/utils/packages.lisp index 823657ee0a6fe20feba5fc5e7311ed62a9c10690..5d8a95dd8f019ebfdd0d6987613ed56bd07e4ebc 100644 --- a/utils/packages.lisp +++ b/utils/packages.lisp @@ -16,7 +16,7 @@ ;; Commercial Software developed at private expense as specified in ;; DOD FAR Supplement 52.227-7013 (c) (1) (ii), as applicable. ;; -;; $Id: packages.lisp,v 1.109 2003/01/30 04:51:56 duane Exp $ +;; $Id: packages.lisp,v 1.110 2003/05/29 00:20:09 duane Exp $ (in-package :common-lisp-user) @@ -3305,7 +3305,7 @@ (in-package :clim) -(cl:defparameter *clim-version* "2.3.19") +(cl:defparameter *clim-version* "2.3.20") #+(version>= 5 0) (cl:locally (cl:declare (cl:special excl::*version-info*))