2013-11-23 Kiss Kalman <kami@zalaszam.hu>

           * utils/sql.lisp: Commit patch adding ccl getenv support

diff --git a/ChangeLog b/ChangeLog
index 7e23b237aeb84ac71f9868363e1ef5fbe5517875..76757095e91b1f52fbda105a6530d2b9aad58de2 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,6 @@
+2013-11-23 Kiss Kalman <kami@zalaszam.hu>
+       * utils/sql.lisp: Commit patch adding ccl getenv support
+
 2013-04-17 Kevin Rosenberg <kevin@rosenberg.net>
        * Version 6.4.1
        * sql/utils.lisp: Patch from Ben Hyde to add weak hash table

diff --git a/db-mysql/Makefile b/db-mysql/Makefile
index 3616e9b6b28a9b7b72d974ca8307968ecd3dac21..bbe489a1129e090126d86b41caaa0d23943457c7 100644 (file)
--- a/db-mysql/Makefile
+++ b/db-mysql/Makefile
@@ -26,7 +26,7 @@ dylib=$(base).dylib
 .PHONY: all
 all: $(shared_lib)
 
-CFLAGS=-I /usr/local/include/mysql -I /usr/include/mysql -I /sw/include/mysql -I /opt/local/include/mysql -I /opt/local/include/mysql5/mysql -I /usr/local/mysql/include
+CFLAGS=-I /usr/local/include/mysql -I /usr/include/mysql -I /sw/include/mysql -I /opt/local/include/mysql -I /opt/local/include/mysql55/mysql -I /usr/local/mysql/include
 LDFLAGS=-L/usr/local/lib64/mysql -L/usr/local/lib/mysql -L/usr/lib64/mysql -L/usr/lib/mysql -L/sw/lib -L/opt/local/lib/mysql -L/opt/local/lib/mysql5/mysql -L/usr/local/mysql/lib -L/usr/lib/gcc/i686-pc-cygwin/3.4.4 -lmysqlclient -lz -lc
 
 CFLAGS32=-I /usr/local/include/mysql -I /usr/include/mysql -I /sw/include/mysql -I /opt/local/include/mysql -I /opt/local/include/mysql5/mysql -I /usr/local/mysql/include -m32

diff --git a/sql/utils.lisp b/sql/utils.lisp
index a215a446ed31cc903584ffc37cf1b18f275ad073..0b58f0fa080b954013fb5fbb370869afb0627c43 100644 (file)
--- a/sql/utils.lisp
+++ b/sql/utils.lisp
@@ -375,7 +375,7 @@ list of characters and replacement strings."
   (cdr (assoc (string var) ext:*environment-list* :test #'equalp
               :key #'string))
   #+lispworks (lw:environment-variable (string var))
-  #+mcl (ccl::getenv var)
+  #+(or mcl ccl) (ccl::getenv var)
   #+sbcl (sb-ext:posix-getenv var))
 
 (eval-when (:compile-toplevel :load-toplevel :execute)