From f4386a4598f4718a8cc42a94ff6a93ab04c21def Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Fri, 26 May 2006 13:19:23 +0000 Subject: [PATCH] sort comments svn: r3074 --- collects/mzlib/foreign.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/mzlib/foreign.ss b/collects/mzlib/foreign.ss index d70598945a..51d6ca097f 100644 --- a/collects/mzlib/foreign.ss +++ b/collects/mzlib/foreign.ss @@ -163,8 +163,8 @@ ;; unreliable). (let* ([version (if (pair? version) (string-append "." (car version)) "")] [fullpath (lambda (p) (path->complete-path (expand-path p)))] - [absolute? (absolute-path? name)] ; orig name - [name0 (path->string (expand-path name))] + [absolute? (absolute-path? name)] + [name0 (path->string (expand-path name))] ; orig name [name (if (regexp-match lib-suffix-re name0) ; name + suffix (string-append name0 version) (string-append name0 "." lib-suffix version))])