From 0b88d27f8fcffcc6e29bfc4688a40b5f04d58ca3 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 25 Jul 2010 06:17:23 -0500 Subject: [PATCH] fix CM+DrRacket cdr bug (cherry picked from commit 4359783d8b23cda757c8c954525b8fcdda9b6306) --- collects/compiler/cm.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/compiler/cm.rkt b/collects/compiler/cm.rkt index 51d30fe703..a14edcd918 100644 --- a/collects/compiler/cm.rkt +++ b/collects/compiler/cm.rkt @@ -83,7 +83,7 @@ (values (path-add-suffix name #".zo") (cdr main-zo-date+mode)) (values (path-add-suffix (rkt->ss name) #".zo") - (cdr (cdr alt-zo-date+mode))))]) + (cdr alt-zo-date+mode)))]) (build-path base mode name)))]) (cond [(and zo-date