X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=uffi%2Fclsql-uffi-loader.cl;h=e13bd68b1e0a376bd5fbe463a21099cdfe5fa32e;hb=fb3fa36a2446cccd10aaa2a7cfb221d86ea76f74;hp=e48384fc841da34912428a3e2a31f485b4f351bd;hpb=2434b58ef00a7f6c5915c86b25a891c4adda79e4;p=clsql.git

diff --git a/uffi/clsql-uffi-loader.cl b/uffi/clsql-uffi-loader.cl
index e48384f..e13bd68 100644
--- a/uffi/clsql-uffi-loader.cl
+++ b/uffi/clsql-uffi-loader.cl
@@ -7,7 +7,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg
 ;;;; Date Started:  Mar 2002
 ;;;;
-;;;; $Id: clsql-uffi-loader.cl,v 1.1 2002/09/18 07:50:01 kevin Exp $
+;;;; $Id: clsql-uffi-loader.cl,v 1.3 2002/09/30 05:32:35 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -22,10 +22,9 @@
 (defvar *clsql-uffi-library-filename* 
   (uffi:find-foreign-library
    "clsql-uffi"
-   `(,(directory-namestring
-       (translate-logical-pathname 
-	"cl-library:clsql-uffi;"))
-     "/usr/lib/clsql/")
+   `("/usr/lib/clsql/"
+     "/opt/lisp/clsql/uffi/"
+     "/home/kevin/debian/src/clsql/uffi/")
    :drive-letters '("C" "D" "E" "F" "G")))
 
 (defvar *clsql-uffi-supporting-libraries* '("c")