diff --git a/collects/compiler/cm.rkt b/collects/compiler/cm.rkt index fbf0331a93..ab896228cc 100644 --- a/collects/compiler/cm.rkt +++ b/collects/compiler/cm.rkt @@ -84,7 +84,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