r11084: 31 Aug 2006 Kevin Rosenberg <kevin@rosenberg.net>

        * db-mysql/mysql-loader: Apply patch from Marcus Pearce to push
        *library-file-dir* to CLSQL's library path.

diff --git a/ChangeLog b/ChangeLog
index 6c0bd23290bce0c05880eaee8da99f2900651a17..a8c653b61621daa6f77ca4156ce6bab6009839b7 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+31 Aug 2006  Kevin Rosenberg <kevin@rosenberg.net>
+       * db-mysql/mysql-loader: Apply patch from Marcus Pearce to push 
+       *library-file-dir* to CLSQL's library path.
+
 30 Aug 2006  Kevin Rosenberg <kevin@rosenberg.net>
        * Version 3.7.0: New platforms supported: SBCL/Win32, CLISP/Win32, CLISP/Cygwin,
        CLISP/Linux x86, CLISP/Linux amd64, OpenMCL amd64. CLISP support requires the

diff --git a/db-mysql/mysql-loader.lisp b/db-mysql/mysql-loader.lisp
index aa903222a62627e7294e4e3a74819752c4f67826..0ec9c03c2f74e592575605f6ececc8e776bfa609 100644 (file)
--- a/db-mysql/mysql-loader.lisp
+++ b/db-mysql/mysql-loader.lisp
@@ -37,6 +37,8 @@ set to the right path before compiling or loading the system.")
   *mysql-library-loaded*)
 
 (defmethod clsql-sys:database-type-load-foreign ((database-type (eql :mysql)))
+  (clsql:push-library-path
+   (make-pathname :directory clsql-mysql-system::*library-file-dir*))
   (clsql-uffi:find-and-load-foreign-library *mysql-library-candidate-names*
                                             :module "mysql"
                                             :supporting-libraries *mysql-supporting-libraries*)