From 4a0d8018b181f490443964d7022397458b1c03d9 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 26 May 2006 12:12:26 +0000 Subject: [PATCH] fixed typo svn: r3071 --- collects/mzlib/foreign.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/mzlib/foreign.ss b/collects/mzlib/foreign.ss index 1e948f7e3a..d70598945a 100644 --- a/collects/mzlib/foreign.ss +++ b/collects/mzlib/foreign.ss @@ -168,7 +168,7 @@ [name (if (regexp-match lib-suffix-re name0) ; name + suffix (string-append name0 version) (string-append name0 "." lib-suffix version))]) - (or (and absolute? + (or (and (not absolute?) (ormap (lambda (dir) ;; try good name first, then original (or (ffi-lib (build-path dir name) #t)