From 681c858b3c6d8fda18f479c4067d06c8f2a0f08d Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Tue, 6 Apr 1999 12:52:31 +0000 Subject: [PATCH] Fix for defsystem's OPERATE-ON-SYSTEM which didn't work with Allegro CL 5.0 on Linux/x86 as there is no CURRENT-DIRECTORY function in "MAKE" package, including packages it uses. From Hannu Koivisto. --- contrib/defsystem/defsystem.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/contrib/defsystem/defsystem.lisp b/contrib/defsystem/defsystem.lisp index 991b778e0..74b9d9137 100644 --- a/contrib/defsystem/defsystem.lisp +++ b/contrib/defsystem/defsystem.lisp @@ -1049,7 +1049,7 @@ `(;; Current directory "./" #+:lucid (working-directory) - #+(or :allegro ACLPC) (current-directory) + #+(or :allegro ACLPC) (excl:current-directory) #+:cmu (ext:default-directory) #+:lispworks ,(multiple-value-bind (major minor) (system::lispworks-version) -- GitLab