diff --git a/collects/setup/unpack.rkt b/collects/setup/unpack.rkt index 769132bd9f..5120182228 100644 --- a/collects/setup/unpack.rkt +++ b/collects/setup/unpack.rkt @@ -218,7 +218,7 @@ (if (file-exists? path) (if (eq? kind 'file) #f - (open-output-file path 'truncate)) + (open-output-file path #:exists 'truncate)) (open-output-file path)))]) (when (and write? (not out)) (print-status (format " skipping ~a; already exists" (pretty-name path))))