the flush needs to happen after the finished-complete-program happens

svn: r11374
2008-08-21 22:47:55 +00:00 · 2008-08-21 22:47:55 +00:00 · 607c13017f
commit 607c13017f
parent 6e674a9804
1 changed files with 1 additions and 1 deletions
--- a/collects/drscheme/private/rep.ss
+++ b/collects/drscheme/private/rep.ss
@ -1106,9 +1106,9 @@ TODO
             (set! in-evaluation? #f)
             (update-running #f)
             (cleanup)
-             (flush-output (get-value-port))
             (when complete-program?
               (send lang front-end/finished-complete-program settings))
+             (flush-output (get-value-port))
             (queue-system-callback/sync
              (get-user-thread)
              (λ () ; =Kernel=, =Handler=