diff --git a/collects/framework/private/editor.ss b/collects/framework/private/editor.ss
index 6f572107..2e2813eb 100644
--- a/collects/framework/private/editor.ss
+++ b/collects/framework/private/editor.ss
@@ -97,7 +97,9 @@
 				     "\n\n"
 				     (format-error-message exn)))
                                    #f)])
+		  (printf "before: ~s ~s ~s\n" input-filename fmt show-errors?)
                   (load-file input-filename fmt show-errors?)
+		  (printf "after\n")
                   #t))))
 	  
 	  (define/private (format-error-message exn)