From 6ae159e8beb9204047a0d465239b15a5934c440d Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Mon, 15 Nov 2010 00:04:11 -0500 Subject: [PATCH] typo --- collects/meta/dist-specs.rkt | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/collects/meta/dist-specs.rkt b/collects/meta/dist-specs.rkt index 51fd7a2158..ece9509c83 100644 --- a/collects/meta/dist-specs.rkt +++ b/collects/meta/dist-specs.rkt @@ -321,8 +321,7 @@ get-libs: := 'all-files+sizes))] [xs (or (assq p xs) (error 'get-libs "unknown package, ~s" p))] [xs (append-map cdr (cdr xs))] - [xs (map (lambda (x) - (if (>= (length xs) 3) (list-ref xs 2) (car xs))) + [xs (map (lambda (x) (if (>= (length x) 3) (list-ref x 2) (car x))) xs)] [xs (remove-duplicates xs)]) `(lib: ,@xs)))