diff --git a/collects/framework/private/finder.ss b/collects/framework/private/finder.ss
index 3baa6fea..11e0274f 100644
--- a/collects/framework/private/finder.ss
+++ b/collects/framework/private/finder.ss
@@ -94,7 +94,6 @@
 
       (define -put-file
 	(λ args
-          (printf "put-file ~s\n" (preferences:get 'framework:file-dialogs))
           (apply (case (preferences:get 'framework:file-dialogs)
                    [(std) std-put-file]
                    [(common) common-put-file])