# HG changeset patch
# User wenzelm
# Date 1296585566 -3600
# Node ID 2b80ee995f9559259b9d86f2bf7f93ca7ba322a8
# Parent  fa0da47131d213b4049d94387bdd3b0e61f639a1
simplified trace;

diff -r fa0da47131d2 -r 2b80ee995f95 src/Pure/Thy/thy_info.ML
--- a/src/Pure/Thy/thy_info.ML	Mon Jan 31 23:53:07 2011 +0100
+++ b/src/Pure/Thy/thy_info.ML	Tue Feb 01 19:39:26 2011 +0100
@@ -187,7 +187,7 @@
 
             val future =
               singleton
-                (Future.forks {name = "theory " ^ name, group = NONE, deps = task_deps, pri = 0})
+                (Future.forks {name = "theory:" ^ name, group = NONE, deps = task_deps, pri = 0})
                 (fn () =>
                   (case map_filter failed deps of
                     [] => body (map (#1 o Future.join o get) parents)