fix CM+DrRacket cdr bug

(cherry picked from commit 4359783d8b)
2010-07-25 06:17:23 -05:00 · 2010-07-25 06:17:23 -05:00 · 0b88d27f8f
commit 0b88d27f8f
parent 96c1c445da
1 changed files with 1 additions and 1 deletions
--- 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