[mcclim-cvs] CVS update: mcclim/utils.lisp

[Bruno Haible]

Update of /project/mcclim/cvsroot/mcclim
In directory common-lisp.net:/tmp/cvs-serv26892

Modified Files:
	utils.lisp 
Log Message:
(get-environment-variable): Add support for CLISP.

Date: Mon Dec 20 16:50:22 2004
Author: bhaible

Index: mcclim/utils.lisp
diff -u mcclim/utils.lisp:1.38 mcclim/utils.lisp:1.39
--- mcclim/utils.lisp:1.38	Wed Oct  6 14:03:56 2004
+++ mcclim/utils.lisp	Mon Dec 20 16:50:22 2004
@@ -22,7 +22,7 @@
 (defun get-environment-variable (string)
   #+excl (sys:getenv string)
   #+cmu (cdr (assoc string ext:*environment-list* :test #'string=))
-  #+clisp (sys::getenv (string string))
+  #+clisp (ext:getenv (string string))
   #+sbcl (sb-ext::posix-getenv string)
   #+openmcl (ccl::getenv string)
   #+lispworks (lw:environment-variable string)