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