diff --git a/collects/meta/build/bundle b/collects/meta/build/bundle
index be80296b1d..e9027fd33c 100755
--- a/collects/meta/build/bundle
+++ b/collects/meta/build/bundle
@@ -502,7 +502,7 @@
   (set! *readme-cache* (file->string *readme-file*))
   (set! *info-domain-cache* (with-input-from-file *info-domain-file* read)))
 (define (write-orig-files)
-  (display-to-file *readme-file* *readme-cache*)
+  (display-to-file *readme-cache* *readme-file* #:exists 'truncate)
   (with-output-to-file *info-domain-file* #:exists 'truncate
     (lambda () (write *info-domain-cache*) (newline))))