diff -r da8817d01e7c -r 23f352990944 src/Tools/WWW_Find/find_theorems.ML
--- a/src/Tools/WWW_Find/find_theorems.ML	Sat Apr 16 15:47:52 2011 +0200
+++ b/src/Tools/WWW_Find/find_theorems.ML	Sat Apr 16 16:15:37 2011 +0200
@@ -207,7 +207,7 @@
 
     fun do_find () =
       let
-        val ctxt = ProofContext.init_global (Thy_Info.get_theory thy_name);
+        val ctxt = Proof_Context.init_global (Thy_Info.get_theory thy_name);
         val query = get_query ();
         val (othmslen, thms) = apsnd rev
           (Find_Theorems.find_theorems ctxt NONE (SOME limit) with_dups query);