r5209: Auto commit for Debian build

[uffi.git] / tests / foreign-loader.lisp

diff --git a/tests/foreign-loader.lisp b/tests/foreign-loader.lisp
index 07977ea87a71d96ab07eec97816a6db3571012dd..eea47945833bdec2517ce43ab170e69c089789bb 100644 (file)
--- a/tests/foreign-loader.lisp
+++ b/tests/foreign-loader.lisp
@@ -7,7 +7,7 @@
 ;;;; Author:        Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: foreign-loader.lisp,v 1.1 2003/05/02 02:54:55 kevin Exp $
+;;;; $Id: foreign-loader.lisp,v 1.3 2003/06/26 18:02:08 kevin Exp $
 ;;;;
 ;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -37,8 +37,9 @@
   
 (unless (uffi:load-foreign-library 
         (uffi:find-foreign-library "uffi-c-test-lib" 
-                                   (list *load-truename*
-                                         "/usr/lib/"))
+                                   (list
+                                    (pathname-directory *load-truename*)
+                                    "/usr/lib/uffi/"))
         :supporting-libraries '("c"))
   (warn "Unable to load uffi-c-test-lib library"))