# HG changeset patch
# User wenzelm
# Date 1284561349 -7200
# Node ID 4a6243de74b98e82806cd59485c0298e9ff036f4
# Parent  a8c337299bc18f36f3f1ddfb55a61addb765cfd6# Parent  e8b94d51fa85a187fa7d7c838789209a09b0bff8
merged

diff -r a8c337299bc1 -r 4a6243de74b9 Admin/isatest/settings/cygwin-poly-e
--- a/Admin/isatest/settings/cygwin-poly-e	Wed Sep 15 15:40:36 2010 +0200
+++ b/Admin/isatest/settings/cygwin-poly-e	Wed Sep 15 16:35:49 2010 +0200
@@ -24,5 +24,4 @@
 
 ISABELLE_USEDIR_OPTIONS="-M 1 -i false -d false"
 
-unset KODKODI
-#init_component "$HOME/contrib_devel/kodkodi"
+init_component "$HOME/contrib/kodkodi"
diff -r a8c337299bc1 -r 4a6243de74b9 src/Pure/PIDE/document.ML
--- a/src/Pure/PIDE/document.ML	Wed Sep 15 15:40:36 2010 +0200
+++ b/src/Pure/PIDE/document.ML	Wed Sep 15 16:35:49 2010 +0200
@@ -204,10 +204,10 @@
 fun async_state tr st =
   if Toplevel.print_of tr then
     ignore
-      (Future.fork
+      (Future.fork_group (Task_Queue.new_group NONE)
         (fn () =>
           Toplevel.setmp_thread_position tr
-            (fn () => Future.status (fn () => Toplevel.print_state false st)) ()))
+            (fn () => Toplevel.print_state false st) ()))
   else ();
 
 in