Skip to content
Snippets Groups Projects
Commit f72a6220 authored by duane's avatar duane
Browse files

see 2.3.20 changelog entry for Wed May 28 17:17:04 PDT 2003

parent ef7943f9
No related branches found
No related tags found
No related merge requests found
...@@ -16,7 +16,7 @@ ...@@ -16,7 +16,7 @@
;; Commercial Software developed at private expense as specified in ;; Commercial Software developed at private expense as specified in
;; DOD FAR Supplement 52.227-7013 (c) (1) (ii), as applicable. ;; 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) (in-package :clim-utils)
...@@ -45,10 +45,10 @@ ...@@ -45,10 +45,10 @@
#-(version>= 7 0) #-(version>= 7 0)
(or (eq environment 'compile-file) excl::*compiler-environment*) (or (eq environment 'compile-file) excl::*compiler-environment*)
#+(version>= 7 0) #+(version>= 7 0)
(or (and excl::*compile-file-environment* (or (and sys::*compile-file-environment*
(excl::compilation-environment-p environment) (excl::compilation-environment-p environment)
environment) environment)
excl::*compile-file-environment*)) sys::*compile-file-environment*))
#+(and allegro never-in-a-million-years) #+(and allegro never-in-a-million-years)
(eval-when (compile) (eval-when (compile)
......
...@@ -16,7 +16,7 @@ ...@@ -16,7 +16,7 @@
;; Commercial Software developed at private expense as specified in ;; Commercial Software developed at private expense as specified in
;; DOD FAR Supplement 52.227-7013 (c) (1) (ii), as applicable. ;; 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) (in-package :common-lisp-user)
...@@ -3305,7 +3305,7 @@ ...@@ -3305,7 +3305,7 @@
(in-package :clim) (in-package :clim)
(cl:defparameter *clim-version* "2.3.19") (cl:defparameter *clim-version* "2.3.20")
#+(version>= 5 0) #+(version>= 5 0)
(cl:locally (cl:declare (cl:special excl::*version-info*)) (cl:locally (cl:declare (cl:special excl::*version-info*))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment